X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=e1c29843a0f3b8e389893e994c293979d7e5469e;hb=d8b3b94c40205c64e08402f4a4b272a55c14f80d;hp=1ffbe70193961fd899fb090d5b1e6c744df56ab5;hpb=3b3a59d698d4388d048f9831d76d6f4c59480670;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 1ffbe701..e1c29843 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -692,8 +692,10 @@ sub send_local_config
 		@nodes = (DXCluster->get_exact($main::mycall));
 	} else {
 		# create a list of all the nodes that are not connected to this connection
-		@nodes = DXNode::get_all();
-		@nodes = grep { $_->dxchan != $self } @nodes;
+		# and are not themselves isolated, this to make sure that isolated nodes
+        # don't appear outside of this node
+		@nodes = DXNode::get_all(); 
+		@nodes = grep { $_->dxchan != $self && !$_->{isolate} } @nodes;
 	}
 
 	my @s = $me->pc19(@nodes);