From: Dirk Koopman Date: Tue, 26 Mar 2024 13:50:01 +0000 (+0000) Subject: fix talk command. X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=54939e890b7452f179003e54ecfc273bebe33390 fix talk command. --- diff --git a/Changes b/Changes index 3b892003..e2f183d1 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,8 @@ +25Mar24====================================================================== +1. Make talk work. Note: this now works as the mojo branch originally + expected - which means that it may (and likely will) flood route talks + where the callsign that you want to talk to does not have a route to + both the callsign and any nodes that it may be connected to. 22Mar24====================================================================== 1. Change the processing of trailing callsigns slightly so that /1 /2 etc are retained, but the /P /M /A /MM etc are removed. diff --git a/cmd/talk.pl b/cmd/talk.pl index 62198627..e924acbd 100644 --- a/cmd/talk.pl +++ b/cmd/talk.pl @@ -24,7 +24,9 @@ return (1, $self->msg('e5')) if $self->remotecmd || $self->inscript; # via is deprecated / ignored $inline =~ s/(?:\s*>([A-Za-z0-9\-]+))\s*//; -($to, $line) = $inline =~ /^\s*([A-Za-z0-9\-]+)\s+(.*)$/; +($to, $line) = $inline =~ /^\s*([A-Za-z0-9\-]+)\s*(.*)?$/; + +#$DB::single = 1; return (1, $self->msg('e8')) unless $to;