X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=d1ac6cf8218cb54ac39330935141eeaf5b1fe512;hb=e21257f7fb3b92795787575094e69a7cd804ce55;hp=1ffbe70193961fd899fb090d5b1e6c744df56ab5;hpb=9c23c26e9c317f924994e1fead122708d3369091;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 1ffbe701..d1ac6cf8 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 && !$_->dxchan->{isolate} } @nodes; } my @s = $me->pc19(@nodes);