X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=7500d17de8bce5ed5ad51e00218350ce50463cfe;hb=8b5b39174f15921598327418562a96219d6abfd5;hp=ea99e3d147e277e9af8c4d9b3b8fd4b2dcc04687;hpb=beff8f08601a34a0fd4431156178d14479cd203a;p=spider.git

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index ea99e3d1..7500d17d 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -215,8 +215,7 @@ sub start
 		my $ref = Route::User::get($call);
 		if ($ref) {
 			foreach my $node (@{$ref->parent}) {
-				my $s = $node eq $main::mycall ? $call : "$node: $call";
-				$self->send($self->msg('loginb', $s));
+				$self->send($self->msg($node eq $main::mycall ? 'loginb' : 'loginbn', $call, $node));
 			} 
 		}
 	}