X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fobscount.pl;h=ed5f6c4574c5cf27ec5db53a3a632f8b79651c6a;hb=2a00eea7b2154d2baa02fc0b584ad4072d9da836;hp=457903778f403a521d012b497776838198360915;hpb=bca5cd40374f12da5e0d46980e54bffc61fdc9c9;p=spider.git diff --git a/cmd/set/obscount.pl b/cmd/set/obscount.pl index 45790377..ed5f6c45 100644 --- a/cmd/set/obscount.pl +++ b/cmd/set/obscount.pl @@ -14,7 +14,7 @@ my $user; my $val = int shift @args if @args; -return (1, $self->msg('e5')) if $self->priv < 9; +return (1, $self->msg('e5')) if $self->priv < 8; return (1, $self->msg('e14')) unless defined $val; return (1, $self->msg('e12')) unless @args; @@ -22,9 +22,7 @@ $val *= 60 if $val < 120; foreach $call (@args) { $call = uc $call; - my $dxchan = DXChannel->get($call); - $user = $dxchan->user if $dxchan; - $user = DXUser->get($call) unless $user; + $user = DXUser->get_current($call); if ($user) { unless ($user->sort eq 'A' || $user->sort eq 'S') { push @out, $self->msg('e13', $call);