X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=8ce857a7abdc2a3a27b7da48a30a0227cc765d8a;hb=6de7782a48aba612f214f54bad5a9dc9584ce1c0;hp=62227d218080c0c8199b4e1cfbee925a4b92d3e2;hpb=1284d2e7cc4c25bb02c7f4fa7c59246de9c0027c;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index 62227d21..8ce857a7 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -100,6 +100,7 @@ use USDB; use UDPMsg; use QSL; use Thingy; +use RouteDB; use Data::Dumper; use IO::File; @@ -127,7 +128,7 @@ $reqreg = 0; # 1 = registration required, 2 = deregister people use vars qw($VERSION $BRANCH $build $branch); $VERSION = sprintf( "%d.%03d", q$Revision$ =~ /(\d+)\.(\d+)/ ); $BRANCH = sprintf( "%d.%03d", q$Revision$ =~ /\d+\.\d+\.(\d+)\.(\d+)/ || (0,0)); -$main::build += 4; # add an offset to make it bigger than last system +$main::build += 3; # add an offset to make it bigger than last system $main::build += $VERSION; $main::branch += $BRANCH; @@ -408,9 +409,9 @@ dbg("DXSpider Version $version, build $build started"); # load Prefixes dbg("loading prefixes ..."); +dbg(USDB::init()); my $r = Prefix::init(); confess $r if $r; -dbg(USDB::init()); # load band data dbg("loading band data ...");