fix search terms starting with \d+ in sh/log etc

This commit is contained in:
Dirk Koopman 2023-02-04 12:13:47 +00:00
parent 378cbf24f1
commit 96f67f30b4
4 changed files with 8 additions and 4 deletions

View File

@ -1,3 +1,7 @@
04Feb23=======================================================================
1. Fixed sh/log so that callsigns beginning with a digit (or several) are
printed rather than being ignored.
This affects: show/ann, chat, log, rcmd and wx
03Feb23=======================================================================
1. Fix is_ipaddr to accept trailing '::' on IPV6 addresses.
2. Fix and extend the TEST program 'showdx' so that it now works on the mojo

View File

@ -1,7 +1,7 @@
#
# print out the general log file for chat only
#
# Copyright (c) 1998-2003 - Dirk Koopman G1TLH
# Copyright (c) 1998-2023 - Dirk Koopman G1TLH
#
#
#
@ -28,7 +28,7 @@ while ($f = shift @f) { # next field
next if $to;
}
next if $who;
if ($f !~ /^\d+/) {
if ($f !~ /^\d+$/) {
($who) = $f;
}
# ($who) = $f =~ /^(\w+)/o;

View File

@ -27,7 +27,7 @@ sub handle
($to) = $f =~ /^(\d+)$/ if !$to; # is it a to count?
next if $to;
}
unless ($f =~ /^\d+/) {
unless ($f =~ /^\d+$/) {
$who = $f;
next if $who;
}

View File

@ -27,7 +27,7 @@ while ($f = shift @f) { # next field
next if $to;
}
next if $who;
if ($f !~ /^\d+/) {
if ($f !~ /^\d+$/) {
($who) = $f;
}
}