X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FDXCommandmode.pm;h=753f59f79e4788e5211c77353c3d891de8b38789;hb=2841b340579dae85808c5a571df3140b736c2fb2;hp=72144d91ea2f302b65a03552cd9728f94797c96c;hpb=de7f7dbbadcad48ba245f22db044b14954e18782;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 72144d91..753f59f7 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -68,7 +68,7 @@ sub new # routing, this must go out here to prevent race condx my $pkg = shift; my $call = shift; - my @rout = $main::routeroot->add_user($call, Route::here(1)); + my @rout = $main::routeroot->add_user($call, 1); my $ref = Route::User::get($call);