X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=7df2ce240e8bfe1045a1319610d3fab9c719fafd;hb=183573e742b5233e3b7ac6882770d16942a10542;hp=93cea6230c32119dfd57c33721f3ddd731feb24d;hpb=5b418391511e712bda1dbe5c76431b9f45e13d13;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 93cea623..7df2ce24 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1384,7 +1384,7 @@ sub send_local_config
 		my $ref = Route::Node::get($self->{call});
 		my @rnodes = $ref->nodes;
 		for my $n (@intcalls) {
-			push @remotenodes, Route::Node::get($n) unless grep $n == $_, @rnodes;
+			push @remotenodes, Route::Node::get($n) unless grep $n eq $_, @rnodes;
 		}
 		unshift @localnodes, $main::routeroot;
 	}