X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Fwwv.pl;fp=cmd%2Funset%2Fwwv.pl;h=075338a25e7d7bf770255aad0a1d30848b712f3d;hb=324bd80ed4aef7e2636f5a03288788ce11ab2663;hp=e7c2286a24a17f3f76800a01ed7b0fedac6ecdee;hpb=61cdf7dc2b72c1898850a4d2aa403d712f22f8ee;p=spider.git diff --git a/cmd/unset/wwv.pl b/cmd/unset/wwv.pl index e7c2286a..075338a2 100644 --- a/cmd/unset/wwv.pl +++ b/cmd/unset/wwv.pl @@ -15,9 +15,9 @@ my @out; foreach $call (@args) { $call = uc $call; - my $user = ($call eq $self->call) ? $self->user : DXUser->get($call); - if ($user) { - $user->wwv(0); + my $chan = DXChannel->get($call); + if ($chan) { + $chan->wwv(0); push @out, $self->msg('wwvu', $call); } else { push @out, $self->msg('e3', "Unset WWV", $call);