X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fstation.pl;h=f6e43f1a2b64ea0cb73bfaac1a2012ee67cf4d52;hb=955a8e00260e9f91e7f1c932771c39fa78394cdb;hp=55976a6917f709187e7dfd0e15ea37e7b8bcb7fd;hpb=07c53835c49bb6eaa0523fba7e45686fd50925c2;p=spider.git diff --git a/cmd/show/station.pl b/cmd/show/station.pl index 55976a69..f6e43f1a 100644 --- a/cmd/show/station.pl +++ b/cmd/show/station.pl @@ -14,8 +14,8 @@ my $seek; push @f, $self->call unless @f; if (@f <= 2 && uc $f[0] eq 'ALL') { - return (1, $self->msg('e6')) if @f == 1 && $self->priv < 6; - return (1, $self->msg('e6')) if $self->priv < 5 || $f[1] eq '*'; + return (1, $self->msg('e6')) if $self->remotecmd && $self->priv < 6; + return (1, $self->msg('e6')) if $self->priv < 5; shift @f; my $exp = shellregex(uc shift @f) if @f; my @calls;