X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fbadword.pl;h=a2b4ce86cbf690aed4cbdbfa7daf187181ef1d02;hb=3cdd57e7baf63341fdcba6b764f304291ed0dbb2;hp=eddefef86d949f8c13bd0a59fe94e483d1ea7eed;hpb=17f0b57add792391822d38116e89b33c1df4e2dd;p=spider.git diff --git a/cmd/show/badword.pl b/cmd/show/badword.pl index eddefef8..a2b4ce86 100644 --- a/cmd/show/badword.pl +++ b/cmd/show/badword.pl @@ -3,8 +3,12 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; +return (1, $self->msg('e5')) if $self->remotecmd; +# are we permitted? +return (1, $self->msg('e5')) if $self->priv < 6; +$line = join(' ', map {s|[/-]\d+$||; $_} split(/\s+/, $line)); return $BadWords::badword->show(1, $self);