projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
58aa400
)
fixed lack of stream?
author
minima
<minima>
Thu, 4 Oct 2001 00:07:41 +0000
(
00:07
+0000)
committer
minima
<minima>
Thu, 4 Oct 2001 00:07:41 +0000
(
00:07
+0000)
perl/DXMsg.pm
patch
|
blob
|
history
diff --git
a/perl/DXMsg.pm
b/perl/DXMsg.pm
index 7b86c8f70a404e848061b2ccf84794008efbbd84..92c113304726f82aaa8efaf75e4841b328e9ac2d 100644
(file)
--- a/
perl/DXMsg.pm
+++ b/
perl/DXMsg.pm
@@
-143,7
+143,7
@@
sub process
my @f = split /\^/, $line;
my ($pcno) = $f[0] =~ /^PC(\d\d)/; # just get the number
my ($tonode, $fromnode) = @f[1, 2];
- my $stream = $f[3] if ($pcno > 29 && $pcno <= 33) || $pcno == 42;
+ my $stream = $f[3] if ($pcno >
=
29 && $pcno <= 33) || $pcno == 42;
SWITCH: {
if ($pcno == 28) { # incoming message