X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=152a5fe05bdb84510ae764028d57ce59106d0524;hb=743d0338dd4ebf095be93b441425b283a20406dc;hp=f72fe8903a37bbe5c1c17a201b99eb936e69b49c;hpb=9685d27bb27511ec2409f323096c68a3b25156fd;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index f72fe890..152a5fe0 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -1449,7 +1449,7 @@ sub send_local_config # and are not themselves isolated, this to make sure that isolated nodes # don't appear outside of this node my @dxchan = grep { $_->call ne $main::mycall && $_->call ne $self->{call} } DXChannel::get_all_nodes(); - @localnodes = map { Route::Node::get($_->{call}) or die "connot find node $_->{call}" } @dxchan if @dxchan; + @localnodes = map { my $r = Route::Node::get($_->{call}); $r ? $r : () } @dxchan if @dxchan; my @intcalls = map { $_->nodes } @localnodes if @localnodes; my $ref = Route::Node::get($self->{call}); my @rnodes = $ref->nodes;