X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=2f3d85f23b95492424846bb05acbe4381106deca;hb=595e0304401baef45d56a55b4b98d7eebe6a7352;hp=eef342bc7dbd718b40ad203f80c5e0f61d6883ee;hpb=bb18c5d0a57e107dbd2ca66d10100318406b73d7;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index eef342bc..2f3d85f2 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -649,7 +649,7 @@ sub talk { my ($self, $from, $to, $via, $line) = @_; $line =~ s/\\5E/\^/g; - $self->send_later('T', "$to de $from: $line") if $self->{talk}; + $self->local_send('T', "$to de $from: $line") if $self->{talk}; Log('talk', $to, $from, $main::mycall, $line); # send a 'not here' message if required unless ($self->{here} && $from ne $to) {