From 2583fc3f93c94ac7d422df4cf03888a466a8390a Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Sat, 12 Jan 2008 00:35:07 +0000
Subject: [PATCH] Fix initialization problem in Rules module

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@8047 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
---
 Shorewall-perl/Shorewall/Rules.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Shorewall-perl/Shorewall/Rules.pm b/Shorewall-perl/Shorewall/Rules.pm
index e86c35b72..89d7e20eb 100644
--- a/Shorewall-perl/Shorewall/Rules.pm
+++ b/Shorewall-perl/Shorewall/Rules.pm
@@ -74,7 +74,7 @@ sub initialize() {
     $sectioned = 0;
     $macro_nest_level = 0;
     $current_param = '';
-    @param_stack;
+    @param_stack = ();
 }
 
 INIT {