X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=4cca42f90f5ca3f5618ca8387892e5c4de7ae4f4;hb=44bbcb37d975a66b4c273d884248e443e51f8681;hp=5234cdab93a071546c3aee179cc35623e1768f50;hpb=e6c2021620d175b0aa8e5b76fc4ba2f5509b8ba7;p=spider.git diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm index 5234cdab..4cca42f9 100644 --- a/perl/DXProtHandle.pm +++ b/perl/DXProtHandle.pm @@ -1659,6 +1659,7 @@ sub handle_92 return unless $parent; # dupe push @radd, $add if $add; + $parent->reset_obs; dbg("ROUTE: reset obscount on $parent->{call} now " . $parent->obscount) if isdbg('obscount'); } } elsif ($sort eq 'A' || $sort eq 'D' || $sort eq 'C') { @@ -1720,6 +1721,7 @@ sub handle_92 my (@nodes, @users); # we reset obscounts on config records as well as K records + $parent->reset_obs; dbg("ROUTE: reset obscount on $parent->{call} now " . $parent->obscount) if isdbg('obscount'); #