From: eldy <>
Date: Wed, 4 Aug 2010 12:56:50 +0000 (+0000)
Subject: Fix bug: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=575545
X-Git-Tag: AWSTATS_7_0_BETA2~16
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=4dddf41fba953e4b2b10b87e2f21e351e8f3d6cc;p=thirdparty%2FAWStats.git

Fix bug: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=575545
---

diff --git a/tools/awstats_buildstaticpages.pl b/tools/awstats_buildstaticpages.pl
index 7118cd7e..8f131ed7 100644
--- a/tools/awstats_buildstaticpages.pl
+++ b/tools/awstats_buildstaticpages.pl
@@ -196,6 +196,7 @@ sub Parse_Config {
 				warning("Warning: Perl versions before 5.6 cannot handle nested includes");
 				next;
 			}
+            local( *CONFIG_INCLUDE );   # To avoid having parent file closed when include file is closed
 		    if ( open( CONFIG_INCLUDE, $includeFile ) ) {
 				&Parse_Config( *CONFIG_INCLUDE , $level+1, $includeFile);
 				close( CONFIG_INCLUDE );
diff --git a/wwwroot/cgi-bin/awstats.pl b/wwwroot/cgi-bin/awstats.pl
index a7c12445..ddff466b 100644
--- a/wwwroot/cgi-bin/awstats.pl
+++ b/wwwroot/cgi-bin/awstats.pl
@@ -1859,6 +1859,7 @@ sub Parse_Config {
 				);
 				next;
 			}
+            local( *CONFIG_INCLUDE );   # To avoid having parent file closed when include file is closed
 			if ( open( CONFIG_INCLUDE, $includeFile ) ) {
 				&Parse_Config( *CONFIG_INCLUDE, $level + 1, $includeFile );
 				close(CONFIG_INCLUDE);