X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fannounce.pl;h=4f521dd30a9c3eea734ad4db25b2e351c30f667e;hb=4cc67094baaf97c4d3d47aca73e2585c36a866eb;hp=1f2d24ab397873b8ea3471a024e0ce89febb452d;hpb=171a7a0bf86e9732a33c7829e808129ec01c51c2;p=spider.git diff --git a/cmd/announce.pl b/cmd/announce.pl index 1f2d24ab..4f521dd3 100644 --- a/cmd/announce.pl +++ b/cmd/announce.pl @@ -15,6 +15,9 @@ my ($self, $line) = @_; my @f = split /\s+/, $line; + +return (1, $self->msg('e9')) if !@f; + my $sort = uc $f[0]; my @locals = DXCommandmode->get_all(); my $to; @@ -35,6 +38,7 @@ 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!