X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=b29592a3a756eb3c8d3c246e78e8ac3827445125;hb=961ba05a38ad079e1fe72de96a59b036b98c35d2;hp=3f4313ef8268dd75f4fffae2d7b369711180929a;hpb=6c38bca91e6b75002e15cce29c45a894f675e22e;p=spider.git diff --git a/perl/Spot.pm b/perl/Spot.pm index 3f4313ef..b29592a3 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -217,7 +217,7 @@ sub dup unpad($text); my $dupkey = "$freq|$call|$d|$text"; return 1 if exists $dup{$dupkey}; - $dup{$dupkey} = $d * 60; # in seconds (to the nearest minute) + $dup{$dupkey} = $d; # in seconds (to the nearest minute) return 0; }