X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=753f59f79e4788e5211c77353c3d891de8b38789;hb=069147b7c204d14e826af2478765be15b72ac96d;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);