From f206dbde832f917b3aaccecac99af668d0542091 Mon Sep 17 00:00:00 2001
From: Darold Gilles <gilles@darold.net>
Date: Sun, 10 Jan 2016 23:56:17 +0100
Subject: [PATCH] Add warning when DNSLookupTimeout is reach. Thanks to
 gitdevmod for the report.

---
 SquidAnalyzer.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/SquidAnalyzer.pm b/SquidAnalyzer.pm
index de4a788..0c1273b 100644
--- a/SquidAnalyzer.pm
+++ b/SquidAnalyzer.pm
@@ -1779,7 +1779,9 @@ sub _gethostbyaddr
 		};
 		if ($@) {
 			$CACHE{$ip} = undef;
-			#printf "_gethostbyaddr timeout : %s\n", $ip;
+			if (!$self->{QuietMode}) {
+				warn "_gethostbyaddr timeout reach for ip: $ip, timeout can be adjusted with directive DNSLookupTimeout\n";
+			}
 		}
 		else {
 			$CACHE{$ip} = $host;