X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=7b86c8f70a404e848061b2ccf84794008efbbd84;hb=58aa400fd03248f21ff8c6a9619faa5f90e9a188;hp=54a2c6f3c04768f9584de08f62d879e5deb90cf4;hpb=14f2cd924047e8d99aa2f5796f8f34ee80802651;p=spider.git

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