X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FAnnTalk.pm;h=5bd44fd49e3104de3bcdec7a4bf9904147b0c433;hb=329702a31bd4a526077c713b12ede457276c79db;hp=b082c38531bd0f77707129db1ac37b2250e62a86;hpb=88665a2bed3b9ec9e97237938a95a045b2a21bb4;p=spider.git

diff --git a/perl/AnnTalk.pm b/perl/AnnTalk.pm
index b082c385..5bd44fd4 100644
--- a/perl/AnnTalk.pm
+++ b/perl/AnnTalk.pm
@@ -30,7 +30,7 @@ sub dup
 	$text = substr($text, 0, $duplth) if length $text > $duplth; 
 	my $dupkey = "$call|$to|$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; 
 }
 
@@ -53,5 +53,6 @@ sub listdups
 	return @out;
 }
 
+
 1;