X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Fwwv.pl;h=67e014b5b385b19149b4eb7291dfd6c86dfe40ef;hb=db1ab4fb2566360a224aa47e8b487150823c10a0;hp=075338a25e7d7bf770255aad0a1d30848b712f3d;hpb=324bd80ed4aef7e2636f5a03288788ce11ab2663;p=spider.git diff --git a/cmd/unset/wwv.pl b/cmd/unset/wwv.pl index 075338a2..67e014b5 100644 --- a/cmd/unset/wwv.pl +++ b/cmd/unset/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; @@ -15,9 +15,10 @@ my @out; foreach $call (@args) { $call = uc $call; - my $chan = DXChannel->get($call); + my $chan = DXChannel::get($call); if ($chan) { - $chan->wwv(0); + DXChannel::wwv($chan, 0); + $chan->user->wantwwv(0); push @out, $self->msg('wwvu', $call); } else { push @out, $self->msg('e3', "Unset WWV", $call);