projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
31fca8d
)
leave the pc19 in the list for longer
author
minima
<minima>
Sun, 19 Jan 2003 03:10:25 +0000
(
03:10
+0000)
committer
minima
<minima>
Sun, 19 Jan 2003 03:10:25 +0000
(
03:10
+0000)
perl/DXProt.pm
patch
|
blob
|
history
diff --git
a/perl/DXProt.pm
b/perl/DXProt.pm
index 118743e1f23ff03e5da83279c3c90ba8086b90ef..5f910bbbc4cc6ffd99ef40426f447797ce6b49b8 100644
(file)
--- a/
perl/DXProt.pm
+++ b/
perl/DXProt.pm
@@
-647,8
+647,6
@@
sub normal
unless ($parent) {
my $nl = $pc19list{$ncall};
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
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;
}
} else {
return;
}
+ delete $pc19list{$ncall};
}
} else {
dbg("PCPROT: Node $ncall not in config") if isdbg('chanerr');
}
} else {
dbg("PCPROT: Node $ncall not in config") if isdbg('chanerr');