X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Fregister.pl;h=c18ac3c7069f24159b993a8a8bc0620d08f63bf7;hb=4b207544da78b182bd12e94eab01451694749012;hp=f789d1ed08f3adad52ef37eb0fc7a94a8f3bc161;hpb=fe7780b7eb15406a7e5caac4ecc499c8f3304e18;p=spider.git diff --git a/cmd/unset/register.pl b/cmd/unset/register.pl index f789d1ed..c18ac3c7 100644 --- a/cmd/unset/register.pl +++ b/cmd/unset/register.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; @@ -17,12 +17,12 @@ if ($self->priv < 9) { Log('DXCommand', $self->call . " attempted to unregister @args"); return (1, $self->msg('e5')); } -return (1, $self->msg('reginac')) unless $main::reqreg; +#return (1, $self->msg('reginac')) unless $main::reqreg; foreach $call (@args) { $call = uc $call; unless ($self->remotecmd || $self->inscript) { - if ($ref = DXUser->get_current($call)) { + if ($ref = DXUser::get_current($call)) { $ref->registered(0); $ref->put(); my $dxchan = DXChannel::get($call);