From 5a916c62409757bf7f64f157050ba243afa81ebf Mon Sep 17 00:00:00 2001 From: DF6FR Date: Sun, 25 Oct 2009 21:27:14 +0000 Subject: [PATCH] ADIF import, actively ignore freq_rx tag. --- yfksubs.pl | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/yfksubs.pl b/yfksubs.pl index e41412d..96d3edc 100644 --- a/yfksubs.pl +++ b/yfksubs.pl @@ -3335,6 +3335,9 @@ for my $i ( 0 .. $#qso ) { # iterate through Array of Hashes if (defined($qso[$i]{'freq'})) { delete $qso[$i]{'freq'}; } + if (defined($qso[$i]{'freq_rx'})) { + delete $qso[$i]{'freq_rx'}; + } } # if there is a frequency tag instead of band, the band has to be @@ -3369,6 +3372,9 @@ for my $i ( 0 .. $#qso ) { # iterate through Array of Hashes } delete $qso[$i]{'freq'}; # don't need it anymore + if (defined($qso[$i]{'freq_rx'})) { + delete $qso[$i]{'freq_rx'}; + } } # RST_RCVD and RST_SENT will be renamed to rstr and rsts