X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=53bd418ba6fc63e7dc7d627f788a8a74c750a94f;hb=7b616aeabce92e3cb416a5fe6640a288adfe5410;hp=60b0f1e6be9eec8c6ca340f5d871be739e0b45ea;hpb=cb20a908914a9b9df907a63551312a69dfe884b5;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 60b0f1e6..53bd418b 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1607,9 +1607,8 @@ sub send_local_config
 	# get all the users connected on the above nodes and send them out
 	foreach $node (@localnodes, @remotenodes) {
 		if ($node) {
-			$self->send_route(\&pc16, 1, $node, 
-							  map {my $r = Route::User::get($_); $r ? ($r) : ()} $node->users)
-				if $self->user->wantsendpc16;
+			my @rout = map {my $r = Route::User::get($_); $r ? ($r) : ()} $node->users;
+			$self->send_route(\&pc16, 1, $node, @rout) if @rout && $self->user->wantsendpc16;
 		} else {
 			dbg("sent a null value") if isdbg('chanerr');
 		}