X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=3a8bf619da82ed8cd97c86efe9ce63447f582b14;hb=d16eece598396e77e2ddc5a55dd9e44eef5b3fee;hp=9848e76f10993748587a5d10fa0b83395f963be9;hpb=101516b420ac77cd9eb8294651104e43f3461c06;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index 9848e76f..3a8bf619 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -428,10 +428,10 @@ DXProt->init(); $routeroot = Route::Node->new($mycall, $version*100+5300, Route::here($DXProt::me->here)|Route::conf($DXProt::me->conf)); # make sure that there is a routing OUTPUT node default file -unless (Filter::read_in('route', 'node_default', 0)) { - my $dxcc = $DXProt::me->dxcc; - $Route::filterdef->cmd($DXProt::me, 'route', 'accept', "node_default call $mycall" ); -} +#unless (Filter::read_in('route', 'node_default', 0)) { +# my $dxcc = $DXProt::me->dxcc; +# $Route::filterdef->cmd($DXProt::me, 'route', 'accept', "node_default call $mycall" ); +#} # read in any existing message headers and clean out old crap dbg("reading existing message headers ...");