X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=92c113304726f82aaa8efaf75e4841b328e9ac2d;hb=8e095bdba5dc26a87b0f1ed0254d08ba80636725;hp=7b86c8f70a404e848061b2ccf84794008efbbd84;hpb=58aa400fd03248f21ff8c6a9619faa5f90e9a188;p=spider.git diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 7b86c8f7..92c11330 100644 --- 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