From: minima Date: Sat, 26 Aug 2000 09:21:10 +0000 (+0000) Subject: fixed syntax error :-( X-Git-Tag: R_1_44~13 X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=35b5c7d7fa637ed0722613d81b36000822b1be03 fixed syntax error :-( --- diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 10dd0ef9..ee2e7e5e 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -183,7 +183,7 @@ sub process my $t = cltounix($f[5], $f[6]); my $stream = next_transno($f[2]); - $f[13] = $self->call unless $f[13] && $f[13] gt ' ' + $f[13] = $self->call unless $f[13] && $f[13] gt ' '; my $ref = DXMsg->alloc($stream, uc $f[3], $f[4], $t, $f[7], $f[8], $f[13], '0', $f[11]); # fill in various forwarding state variables