hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-21 15:57:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

Change callsign suffix handling somewhat

Browse Source
This commit is contained in:
Dirk Koopman 2024-03-22 17:26:43 +00:00
parent cee0bfe61e
commit 3f7f9d8e9e
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Changes
View File

@ -1,3 +1,6 @@
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.
20Mar24======================================================================
1. Has it really been so long since the last update?
2. Since forever, mainly because filtering was done very early on in

2
perl/Prefix.pm
View File

@ -274,7 +274,7 @@ LM: foreach $call (split /,/, $calls) {
# remove any /0-9 /P /A /M /MM /AM suffixes etc
if (@parts > 1) {
@parts = grep { !/^\d+$/ && !/^[PABM]$/ && !/^(?:|AM|MM|BCN|JOTA|SIX|WEB|NET|Q\w+)$/; } @parts;
pop @parts if $parts[-1] =~ /^(?:[PABM]|AM|MM|BCN|JOTA|SIX|WEB|NET|Q\w+)$/;
# can we resolve them by direct lookup
my $s = join('/', @parts);