X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=bd317de470d6441e5969edf0d853614db7a913fe;hb=9c8f43f26a7db08c4ff6ef2213c95c9f509abe36;hp=6cc0eea4bdb9241e6bb9090ed515b64ef9c27c30;hpb=d235b0d777f1a90c65d5dcf8cd6adaeb9f2b7e99;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 6cc0eea4..bd317de4 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -928,7 +928,7 @@ sub gen_my_pc92_config
 		clear_pc92_changes();		# remove any slugged data, we are generating it as now
 		my @dxchan = grep { $_->call ne $main::mycall && !$_->{isolate} } DXChannel::get_all();
 		dbg("ROUTE: all dxchan: " . join(',', map{$_->{call}} @dxchan)) if isdbg('routelow');
-		my @localnodes = map { my $r = Route::get($_->{call});($_->is_node || $_->is_user) && $r ? $r : () } @dxchan;
+		my @localnodes = map { my $r = Route::get($_->{call}); ($_->is_node || $_->is_user) && $r ? $r : () } @dxchan;
 		dbg("ROUTE: localnodes: " . join(',', map{$_->{call}} @localnodes)) if isdbg('routelow');
 		return pc92c($node, @localnodes);
 	} else {