From 26a632f2e859c7738398095fead0d5b0559b7637 Mon Sep 17 00:00:00 2001 From: minima Date: Thu, 16 Aug 2001 14:41:52 +0000 Subject: [PATCH] stop any 'in transit' messages --- cmd/kill.pl | 2 ++ 1 file changed, 2 insertions(+) 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); } -- 2.34.1