X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FWCY.pm;h=3645e25cb4dbd933525f03c49a1b39dca2480b1c;hb=2bf94bc6ccf43f39cc39309ad7eefb51eec1fc25;hp=ef1a9b21f523ed8a357ca930dabf6f8f4c68985a;hpb=e83b70ecab022dbbeac0b56f67ed2e4bed609e86;p=spider.git

diff --git a/perl/WCY.pm b/perl/WCY.pm
index ef1a9b21..3645e25c 100644
--- a/perl/WCY.pm
+++ b/perl/WCY.pm
@@ -231,7 +231,7 @@ sub dup
 #	$text = substr($text, 0, $duplth) if length $text > $duplth; 
 	my $dupkey = "$d|$sfi|$k|$a|$r";
 	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; 
 }