X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Ffilter.pl;h=f1522c35a2b0e7faa36eedeb6efd7babef92b84a;hb=b26c5204bc58c12fc4d61725ba4f1cfc1a38be45;hp=345603b847456060293214f153246e4ad3f02b45;hpb=ebbe325acb6e18437ae01cb1b32e615c83e24641;p=spider.git diff --git a/cmd/show/filter.pl b/cmd/show/filter.pl index 345603b8..f1522c35 100644 --- a/cmd/show/filter.pl +++ b/cmd/show/filter.pl @@ -10,10 +10,12 @@ my @f = split /\s+/, $line; my @out; my $call = $self->call; -if (@f && $self->priv >= 8) { +if (@f) { if (is_callsign(uc $f[0])) { + return (1, $self->msg('e5')) unless $self->priv >= 1; $call = uc shift @f; } elsif ($f[0] eq 'node_default' || $f[0] eq 'user_default') { + return (1, $self->msg('e5')) unless $self->priv >= 1; $call = shift @f; } } @@ -22,7 +24,7 @@ my @in; if (@f) { push @in, @f; } else { - push @in, qw(ann spots wcy wwv); + push @in, qw(route ann spots wcy wwv); } my $sort;