X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Fbadspotter.pl;h=20c5569f0c3d680c2d87e5d46b9b34a34a82e6d1;hb=refs%2Fheads%2Fstaging;hp=5664f1cb207fdbad84edeaf6ba6e48f51eaadf75;hpb=0a92a4608d715cd9cd7eec3c120da651fbb4da5b;p=spider.git diff --git a/cmd/unset/badspotter.pl b/cmd/unset/badspotter.pl index 5664f1cb..20c5569f 100644 --- a/cmd/unset/badspotter.pl +++ b/cmd/unset/badspotter.pl @@ -3,8 +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);