X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fdx.pl;h=8d599d5e5e81dba128f02f018e194762475a30ba;hb=b53046d61e0d9ff16e95e12d2f3b52ffa4e735d7;hp=00ea032862d92f1dd180e3a91080e5593e6ac006;hpb=07ea293f3919d2da76220b5fbc55b734008ed44c;p=spider.git

diff --git a/cmd/set/dx.pl b/cmd/set/dx.pl
index 00ea0328..8d599d5e 100644
--- a/cmd/set/dx.pl
+++ b/cmd/set/dx.pl
@@ -15,12 +15,13 @@ my @out;
 
 foreach $call (@args) {
   $call = uc $call;
-  my $user = ($call eq $self->call) ? $self->user : DXUser->get($call);
-  if ($user) {
-    $user->dx(1);
-	push @out, DXM::msg('dxs', $call);
+  my $chan = DXChannel->get($call);
+  if ($chan) {
+    $chan->dx(1);
+    $chan->user->wantdx(1);
+	push @out, $self->msg('dxs', $call);
   } else {
-    push @out, DXM::msg('e3', "Set DX Spots", $call);
+    push @out, $self->msg('e3', "Set DX Spots", $call);
   }
 }
 return (1, @out);