From: djk Date: Sun, 24 Oct 1999 16:31:36 +0000 (+0000) Subject: er, remove syntax error X-Git-Tag: R_1_33~2 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=5232a160e5361e9bdcb8e2202c8063b8df6bd9dc;p=spider.git er, remove syntax error --- diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 741e4b33..46ba8909 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -911,7 +911,7 @@ sub send_announce ($filter, $hops) = Filter::it($dxchan->{annfilter}, @_, $self->{call} ); next unless $filter; } - if ($dxchan->is_ak1a && $field[1] ne $main::mycall) { # i.e not specifically routed to me + if ($dxchan->is_ak1a && $_[1] ne $main::mycall) { # i.e not specifically routed to me next if $dxchan == $self; if ($hops) { $routeit = $line;