4 # Copyright (c) 1998 - Dirk Koopman
9 my ($self, $line) = @_;
10 my @args = split /\s+/, $line;
14 @args = $self->call if (!@args || $self->priv < 9);
16 foreach $call (@args) {
18 my $chan = DXChannel::get($call);
21 $chan->user->wantdx(1);
22 push @out, $self->msg('dxs', $call);
24 push @out, $self->msg('e3', "Set DX Spots", $call);