X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Fbadspotter.pl;h=20c5569f0c3d680c2d87e5d46b9b34a34a82e6d1;hb=3cdd57e7baf63341fdcba6b764f304291ed0dbb2;hp=5c2433e9289d00703cfdc25682ac15a4cfa33770;hpb=8007adef1e949086cb27444d61f554ba456c0685;p=spider.git diff --git a/cmd/unset/badspotter.pl b/cmd/unset/badspotter.pl index 5c2433e9..20c5569f 100644 --- a/cmd/unset/badspotter.pl +++ b/cmd/unset/badspotter.pl @@ -3,9 +3,13 @@ # # 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)); $line = join(' ', map {s|[/-]\d+$||; $_} split(/\s+/, $line)); return $DXProt::badspotter->unset(8, $self->msg('e6'), $self, $line);