Change buddy message.

[spider.git] / perl / DXCommandmode.pm

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index ea99e3d147e277e9af8c4d9b3b8fd4b2dcc04687..7500d17de8bce5ed5ad51e00218350ce50463cfe 100644 (file)
--- 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));
                        } 
                }
        }