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;