X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=e7cf7e972c94a4ac5a401366565035c65460629f;hb=aab304809ccbaa1512aad80e1e75e8f057558656;hp=d8f6eb54d6bbb7ab61b603b058ac5b71da874d49;hpb=dd0ddcd3ae2d605a2a1f549da0263fa99c44f92d;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index d8f6eb54..e7cf7e97 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -630,7 +630,7 @@ sub talk { my ($self, $from, $to, $via, $line) = @_; $line =~ s/\\5E/\^/g; - $self->send("$to de $from $line") if $self->{talk}; + $self->send("$to de $from: $line") if $self->{talk}; Log('talk', $to, $from, $main::mycall, $line); }