X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute.pm;h=f637539c0c41c11f5ffa531b485789430a2fc4da;hb=d638bda3f73da1b09d029105a0f3c95093c50df5;hp=794b8d3d71e15084a36d6854a81bf4129e33a49e;hpb=c8e15fc7003b239a21787cf79f22debdf3c419fd;p=spider.git

diff --git a/perl/Route.pm b/perl/Route.pm
index 794b8d3d..f637539c 100644
--- a/perl/Route.pm
+++ b/perl/Route.pm
@@ -295,7 +295,10 @@ sub findroutes
 
 	# return immediately if we are directly connected
 	my $dxchan = DXChannel::get($call);
-	return $dxchan if $dxchan;
+	if ($dxchan) {
+		dbg("ROUTE: findroutes $call -> directly connected") if isdbg('findroutes');
+		return $dxchan;
+	}
 
 	my $nref = Route::get($call);
 	return () unless $nref;
@@ -306,7 +309,10 @@ sub findroutes
 	foreach my $p (@parent) {
 		# return immediately if we are directly connected or a user's parent node is
 		$dxchan = DXChannel::get($p);
-		return $dxchan if $dxchan;
+		if ($dxchan) {
+			dbg("ROUTE: findroutes $call -> connected direct via parent $p") if isdbg('findroutes');
+			return $dxchan;
+		}
 
 		my $r = Route::Node::get($p);
 		if ($r) {