add more code gradually

[spider.git] / perl / cluster.pl

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 01d2809e2e18ee007eb4e4f3245dc29ed8de2ea4..59a03030908e922db892a69bde896b8eee29b9ce 100755 (executable)
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -502,7 +502,7 @@ DXProt->init();
 QXProt->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+5300, Route::here($main::me->here)|Route::conf($main::me->conf));
+$routeroot = Route::Node->new($mycall, $version*100+5251, Route::here($main::me->here)|Route::conf($main::me->conf));
 
 # make sure that there is a routing OUTPUT node default file
 #unless (Filter::read_in('route', 'node_default', 0)) {