Improve the selection of parser for XML::Simple.

[spider.git] / cmd / announce.pl

diff --git a/cmd/announce.pl b/cmd/announce.pl
index 6bad4af39449d256c7c023751e9c803181dc8c8b..a3ccb5b033d7f98dc8a9044212c40f0c3e38dcdc 100644 (file)
--- a/cmd/announce.pl
+++ b/cmd/announce.pl
@@ -53,7 +53,7 @@ my $nossid = $from;
 my $drop = 0;
 $nossid =~ s/-\d+$//;
 if ($DXProt::badspotter->in($nossid)) {
-       LogDbg('DXCommand', "bad spotter ($from) made announcement: $line");
+       LogDbg('DXCommand', "bad spotter ($self->{call}) made announcement: $line");
        $drop++;
 }