X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fusers.pl;h=a3fb3cc26ee510aeae8879bacd99a52f34d7c258;hb=fd0973e8351e0fc5e762034da5fa02e2a715b6dd;hp=f1aa6ca6926aa75ba2efad105fc421c81c2d047f;hpb=244e520095fef24472ae52781b3ba06577a3e5d4;p=spider.git diff --git a/cmd/show/users.pl b/cmd/show/users.pl index f1aa6ca6..a3fb3cc2 100644 --- a/cmd/show/users.pl +++ b/cmd/show/users.pl @@ -28,14 +28,14 @@ if (@list) { } } else { my $node = $main::routeroot; - push @out, "Callsigns connected to $main::mycall"; + push @out, join(' ', $self->msg('userconn'), $main::mycall); my $call; my $i = 0; my @l; my @val = sort $node->users; foreach $call (@val) { if ($i >= 5) { - push @out, sprintf "%-12s %-12s %-12s %-12s %-12s %-12s", @l; + push @out, sprintf "%-12s %-12s %-12s %-12s %-12s", @l; @l = (); $i = 0; } @@ -50,7 +50,7 @@ if (@list) { $i++; } push @l, "" while $i++ < 5; - push @out, sprintf "%-12s %-12s %-12s %-12s %-12s %-12s", @l; + push @out, sprintf "%-12s %-12s %-12s %-12s %-12s", @l; } return (1, @out);