X-Git-Url: http://scm.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=d73bbc62c77a448aaed8278d61025daed5654b97;hb=6ca24487551f66211b94d8a719e482ee3af81a29;hp=96e62c707f1684d85860361782e567c88c14aa09;hpb=2c50f9b4b2b3f29b000d77623a9d7c3748933aef;p=spider.git

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index 96e62c70..d73bbc62 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1265,6 +1265,8 @@ sub handle_51
 	}
 }
 
+sub handle_61 { goto &handle_11; }
+
 # dunno but route it
 sub handle_75
 {
@@ -1655,10 +1657,11 @@ sub handle_92
 		if (@ent) {
 			my $add;
 
-			($parent, $add) = $self->pc92_handle_first_slot($ent[0], $parent, $t);
+			($parent, $add) = $self->pc92_handle_first_slot(\@ent, $parent, $t);
 			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 +1723,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');
 
 			#