From: eldy <>
Date: Sat, 27 Jul 2002 17:15:25 +0000 (+0000)
Subject: AWStats can use a DNS cache file
X-Git-Tag: AWSTATS_5_0_BETA~136
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=eaf1113e14dc23cbcf8f4a8b6eeaf81a8368e331;p=thirdparty%2FAWStats.git

AWStats can use a DNS cache file
---

diff --git a/wwwroot/cgi-bin/plugins/hashfiles.pm b/wwwroot/cgi-bin/plugins/hashfiles.pm
index c0d05b3e..7ec4472e 100644
--- a/wwwroot/cgi-bin/plugins/hashfiles.pm
+++ b/wwwroot/cgi-bin/plugins/hashfiles.pm
@@ -10,6 +10,7 @@
 
 
 use Storable;
+use strict;no strict "refs";
 $Plugin_hashfiles=1;
 
 
@@ -74,7 +75,7 @@ sub SaveHash_hashfiles {
 	my ($filetosave,$hashtosave,$testifuptodate,$nbmaxofelemtosave,$nbofelemsaved)=@_;
 	if (! $testifuptodate || ! $hashfileuptodate) {
 		$filetosave =~ s/(\.\w+)$//; $filetosave.=".hash";
-		debug(" Save data ".($nbofelemtosave?"($nbofelemtosave records max)":"(all records)")." into hash file $filetosave");
+		debug(" Save data ".($nbmaxofelemtosave?"($nbmaxofelemtosave records max)":"(all records)")." into hash file $filetosave");
 		if (! $nbmaxofelemtosave || (scalar keys %$hashtosave <= $nbmaxofelemtosave)) {
 			# Save all hash array
 			eval('store(\%$hashtosave, "$filetosave");');