X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fannounce.pl;h=f9d3fc4b285b8640c0cf04100ba49600634de184;hb=cce345b95c555a0b45218c5b452bc0f5f4f13bab;hp=cb2e325dff6c8c6e62811e276ae8fe913a59345b;hpb=0824a94355e5fb2b4c379bb013d66466725629f5;p=spider.git diff --git a/cmd/announce.pl b/cmd/announce.pl index cb2e325d..f9d3fc4b 100644 --- a/cmd/announce.pl +++ b/cmd/announce.pl @@ -35,10 +35,11 @@ if ($sort eq "FULL") { $to = "LOCAL"; } +Log('ann', $to, $from, $line); DXProt::broadcast_list("To $to de $from <$t>: $line", @locals); if ($to ne "LOCAL") { $line =~ s/\^//og; # remove ^ characters! - my $pc = DXProt::pc12($self, $line, $tonode, $sysopflag, 0); + my $pc = DXProt::pc12($from, $line, $tonode, $sysopflag, 0); DXProt::broadcast_ak1a($pc); }