added broadcast_all_ak1a so that local commands go to isolated clusters

[spider.git] / cmd / kill.pl

diff --git a/cmd/kill.pl b/cmd/kill.pl
index d3614c3632f4dd5e4e1ca40623ba23b8db54f5dc..82e229756f5bc20e9f07df99087537180413467c 100644 (file)
--- a/cmd/kill.pl
+++ b/cmd/kill.pl
@@ -37,7 +37,7 @@ for $msgno (@f) {
   } 
   Log('msg', "Message $ref->{msgno} from $ref->{from} to $ref->{to} deleted by $call");
   if ($full) {
-         DXProt::broadcast_ak1a(DXProt::pc49($self->call, $ref->{subject}), $DXProt::me);
+         DXProt::broadcast_all_ak1a(DXProt::pc49($self->call, $ref->{subject}), $DXProt::me);
   }
   $ref->del_msg;
   push @out, "Message $msgno deleted";