From cbbae5ecadd074d39dac69d9912e4f2eb27d543b Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Mon, 14 Jun 2010 00:19:02 -0700
Subject: [PATCH] Fix iptables parsing

---
 firewall/firewall-lib.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/firewall/firewall-lib.pl b/firewall/firewall-lib.pl
index 27395868d..71544b479 100755
--- a/firewall/firewall-lib.pl
+++ b/firewall/firewall-lib.pl
@@ -73,7 +73,7 @@ while(<FILE>) {
 		# New chain definition
 		$table->{'defaults'}->{$2} = '-';
 		}
-	elsif (/^(\[[^\]]*\]\s+)?-(AI)\s+(\S+)(.*)/) {
+	elsif (/^(\[[^\]]*\]\s+)?-(A|I)\s+(\S+)(.*)/) {
 		# Rule definition
 		local $rule = { 'line' => $lnum,
 				'eline' => $lnum,