X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FDXProt.pm;h=7df2ce240e8bfe1045a1319610d3fab9c719fafd;hb=f4a1d40bb0d356f3f3d1df101d9c67d6a05b38ec;hp=59e7ca07d7bf2ad89622a3c1096ae237d123cf65;hpb=3f93e02718a31f272434796e151cb3358a1fd7ed;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 59e7ca07..7df2ce24 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1368,7 +1368,9 @@ sub send_local_config
 	my @nodes;
 	my @localnodes;
 	my @remotenodes;
-		
+
+	dbg('trace', 'DXProt::send_local_config');
+	
 	# send our nodes
 	if ($self->{isolate}) {
 		@localnodes = ( $main::routeroot );
@@ -1382,7 +1384,7 @@ sub send_local_config
 		my $ref = Route::Node::get($self->{call});
 		my @rnodes = $ref->nodes;
 		for my $n (@intcalls) {
-			push @remotenodes, Route::Node::get($n) if grep $n ne $_, @rnodes;
+			push @remotenodes, Route::Node::get($n) unless grep $n eq $_, @rnodes;
 		}
 		unshift @localnodes, $main::routeroot;
 	}