From: minima Date: Sun, 19 Jan 2003 03:10:25 +0000 (+0000) Subject: leave the pc19 in the list for longer X-Git-Tag: PRE-1-52~83 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=e8df1ab836f28cc7a703c524af0410070d4258cb;p=spider.git leave the pc19 in the list for longer --- 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');