X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=fc43a4e1139bdbe025ddacea311699316e43bea5;hb=b1de8d406cf0b76292d401c4b75f33fca86a822d;hp=0f80232ac8432636ef1d65a6f9a0bf609672e960;hpb=b67b50de92dbf61ce939b42f7c74e30dc58eba41;p=spider.git

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 0f80232a..fc43a4e1 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -416,11 +416,8 @@ sub disconnect
 		$node->dxchan($DXProt::me);
 	}
 
-	my $pref = Route::Node::get($main::mycall);
-	if ($pref) {
-		my @rout = $pref->del_user($main::mycall);
-		dbg('route', "B/C PC17 on $main::mycall for: $call");
-	}
+	my @rout = $main::routeroot->del_user($call);
+	dbg('route', "B/C PC17 on $main::mycall for: $call");
 
 	# I was the last node visited
     $self->user->node($main::mycall);