my $ldupkey = "X$freq|$call|$by" . uc $text;
my $t = DXDupe::find($ldupkey);
return 1 if $t && $t - $main::systime > 0;
my $ldupkey = "X$freq|$call|$by" . uc $text;
my $t = DXDupe::find($ldupkey);
return 1 if $t && $t - $main::systime > 0;
# my $sdupkey = "X$freq|$call|$by";
# $t = DXDupe::find($sdupkey);
# return 1 if $t && $t - $main::systime > 0;
# my $sdupkey = "X$freq|$call|$by";
# $t = DXDupe::find($sdupkey);
# return 1 if $t && $t - $main::systime > 0;
- DXDupe::add($ldupkey, $main::systime+$dupage);
- DXDupe::add($sdupkey, $main::systime+$dupage);
+# DXDupe::add($sdupkey, $main::systime+$dupage);