From 991be0ac16985d49b324e6ee3137ee8951573bf6 Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Sun, 22 Jul 2007 12:46:05 +0000
Subject: [PATCH] Remove extra space

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

diff --git a/Shorewall-perl/Shorewall/Config.pm b/Shorewall-perl/Shorewall/Config.pm
index d20ccee54..83433e692 100644
--- a/Shorewall-perl/Shorewall/Config.pm
+++ b/Shorewall-perl/Shorewall/Config.pm
@@ -877,7 +877,7 @@ sub read_a_line() {
 	    #
 	    # Expand Shell Variables using %ENV
 	    #
-	    #                            $ 1     $2   $3              -     $4
+	    #                            $1      $2      $3           -     $4
 	    while ( $currentline =~ m( ^(.*?) \$({)? ([a-zA-Z]\w*) (?(2)}) (.*)$)x ) {
 		my $val = $ENV{$3};
 		$val = '' unless defined $val;