From: minima <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.org/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