From 65b16a1acf94eb242e9144fed519ece80ed3f3d3 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Sun, 15 Jul 2012 10:07:06 -0700
Subject: [PATCH] Compensate for bugs in the latest CPerl emacs extension

Signed-off-by: Tom Eastep <teastep@shorewall.net>
---
 Shorewall/Perl/Shorewall/Chains.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm
index 1a61a741e..b2d7c3009 100644
--- a/Shorewall/Perl/Shorewall/Chains.pm
+++ b/Shorewall/Perl/Shorewall/Chains.pm
@@ -36,7 +36,7 @@ use Shorewall::IPAddrs;
 use strict;
 
 our @ISA = qw(Exporter);
-our @EXPORT = qw(
+our @EXPORT = qw/
 		    DONT_OPTIMIZE
 		    DONT_DELETE
 		    DONT_MOVE
@@ -86,10 +86,10 @@ our @EXPORT = qw(
 		    $nat_table
 		    $mangle_table
 		    $filter_table
-	       );
+		/;
 
 our %EXPORT_TAGS = (
-		    internal => [  qw( STANDARD
+		    internal => [  qw/ STANDARD
 				       NATRULE
 				       BUILTIN
 				       NONAT
@@ -244,7 +244,7 @@ our %EXPORT_TAGS = (
 				       create_stop_load
 				       %targets
 				       %dscpmap
-				     ) ],
+				     / ],
 		   );
 
 Exporter::export_ok_tags('internal');