From: minima Date: Thu, 16 Aug 2001 14:41:52 +0000 (+0000) Subject: stop any 'in transit' messages X-Git-Tag: R_1_48~103 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=26a632f2e859c7738398095fead0d5b0559b7637;p=spider.git stop any 'in transit' messages --- diff --git a/cmd/kill.pl b/cmd/kill.pl index dd476059..ab7bb511 100644 --- a/cmd/kill.pl +++ b/cmd/kill.pl @@ -66,6 +66,8 @@ foreach $ref ( @refs) { if ($full) { DXProt::broadcast_ak1a(DXProt::pc49($ref->{from}, $ref->{subject}), $DXProt::me); } + my $tonode = $ref->tonode; + $ref->stop_msg($tonode) if $tonode; $ref->del_msg; push @out, $self->msg('m12', $ref->msgno); }