From e8df1ab836f28cc7a703c524af0410070d4258cb Mon Sep 17 00:00:00 2001 From: minima Date: Sun, 19 Jan 2003 03:10:25 +0000 Subject: [PATCH] leave the pc19 in the list for longer --- perl/DXProt.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 118743e1..5f910bbb 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -647,8 +647,6 @@ sub normal unless ($parent) { my $nl = $pc19list{$ncall}; - delete $pc19list{$ncall} if $nl; # whatever happens - it goes - if ($nl && @field > 3) { # 3 because of the hop count! # this is a new (remembered) node, now attach it to me if it isn't in filtered @@ -690,6 +688,7 @@ sub normal } else { return; } + delete $pc19list{$ncall}; } } else { dbg("PCPROT: Node $ncall not in config") if isdbg('chanerr'); -- 2.34.1