projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
d2e14e9
)
add missing return on end of pc41 processing
author
minima
<minima>
Sun, 10 Jun 2001 00:32:21 +0000
(
00:32
+0000)
committer
minima
<minima>
Sun, 10 Jun 2001 00:32:21 +0000
(
00:32
+0000)
perl/DXProt.pm
patch
|
blob
|
history
diff --git
a/perl/DXProt.pm
b/perl/DXProt.pm
index 01adbc7d5174850c7120eca7a45888e147a4a47f..dfb571b280c3333d91cc8502090a0659040fab4a 100644
(file)
--- a/
perl/DXProt.pm
+++ b/
perl/DXProt.pm
@@
-913,10
+913,13
@@
sub normal
$user->put;
my $ref = Route::get($call);
$self->route_pc41($ref, $call, $field[2], $field[3], $field[4]) if $ref && !eph_dup($line);
+ return;
}
+
if ($pcno == 43) {
last SWITCH;
}
+
if ($pcno == 37 || $pcno == 44 || $pcno == 45 || $pcno == 46 || $pcno == 47 || $pcno == 48) {
DXDb::process($self, $line);
return;