From b2e6f5aea28c1be9a54d6551fd30222c11bff4d0 Mon Sep 17 00:00:00 2001 From: teastep Date: Sat, 21 Jul 2007 21:19:07 +0000 Subject: [PATCH] Cosmetic change git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6931 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb --- Shorewall-perl/Shorewall/Config.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/Shorewall-perl/Shorewall/Config.pm b/Shorewall-perl/Shorewall/Config.pm index 3e616c998..1624e04ec 100644 --- a/Shorewall-perl/Shorewall/Config.pm +++ b/Shorewall-perl/Shorewall/Config.pm @@ -877,11 +877,11 @@ sub read_a_line() { # # Expand Shell Variables using %ENV # - while ( $currentline =~ m( ^(.*?) #Part preceding '$' - \$({)? #'$' and optional '{' - ([a-zA-Z]\w*) #Shell Variable Name - (?(2)}) #Match closing '}' - (.*)$)x #Rest of Line + while ( $currentline =~ m( ^(.*?) # Part preceding '$' + \$({)? # '$' and optional '{' + ([a-zA-Z]\w*) # Shell Variable Name + (?(2)}) # Match opening '{' + (.*)$)x # Rest of Line ) { my $val = $ENV{$3}; $val = '' unless defined $val;