X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=af1fe2e70cc26e8abd6f08b8b7b9accdf9269029;hb=da115e307d67c9aa6756a7b3b1cfa7a6f70e2e0d;hp=1f225b592862c76e217ca6bc8e9f39082e1cf9fb;hpb=80c59c4d9c407fd5021e693cf4ed5d1192b12d6c;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 1f225b59..af1fe2e7 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -267,7 +267,7 @@ DXProt->init();
 Aranea->init();
 
 # put in a DXCluster node for us here so we can add users and take them away
-$routeroot = Route::Node->new($mycall, $version*100+5252, $main::me->here);
+$routeroot = Route::Node->new($mycall, int($version*100)+$DXProt::myprot_version, $main::me->here);
 
 # make sure that there is a routing OUTPUT node default file
 #unless (Filter::read_in('route', 'node_default', 0)) {