X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Fbaddx.pl;h=84d4d5fec949258b4708ef38bbd5fcaa284ef50e;hb=3cdd57e7baf63341fdcba6b764f304291ed0dbb2;hp=e9798728a28f573d0f6a670ad99884f4a68c4e96;hpb=0a92a4608d715cd9cd7eec3c120da651fbb4da5b;p=spider.git diff --git a/cmd/unset/baddx.pl b/cmd/unset/baddx.pl index e9798728..84d4d5fe 100644 --- a/cmd/unset/baddx.pl +++ b/cmd/unset/baddx.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 $DXProt::baddx->unset(8, $self->msg('e6'), $self, $line);