X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Faddress.pl;h=f31a982ea3224bd028acdc56b9c5bfbb9bca6905;hb=65744dd1e30165cd280502ee1a05c0c640023303;hp=f5922d9c31e53cd8b177020576025ff50e22c239;hpb=1cf4bd14be226274d5deb05da8480ab91a5dac52;p=spider.git

diff --git a/cmd/set/address.pl b/cmd/set/address.pl
index f5922d9c..f31a982e 100644
--- a/cmd/set/address.pl
+++ b/cmd/set/address.pl
@@ -18,10 +18,11 @@ if ($self->priv >= 5) {             # allow a callsign as first arg
   shift @args if $user;
   $line = join ' ', @args;
 } else {
+  $call = $self->call;
   $user = $self->user;
 }
 
 $user->addr($line);
-push @out, DXM::msg('addr', $call);
+push @out, DXM::msg('addr', $call, $line);
 
 return (1, @out);