From: minima Date: Thu, 4 Oct 2001 00:00:47 +0000 (+0000) Subject: add pc42 for streams X-Git-Tag: R_1_49~75 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=58aa400fd03248f21ff8c6a9619faa5f90e9a188;p=spider.git add pc42 for streams --- diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 54a2c6f3..7b86c8f7 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; + my $stream = $f[3] if ($pcno > 29 && $pcno <= 33) || $pcno == 42; SWITCH: { if ($pcno == 28) { # incoming message