From e8ff0cb961fd46487a6f5e05be084fc361680d4e Mon Sep 17 00:00:00 2001 From: teastep Date: Sun, 1 Apr 2007 00:05:42 +0000 Subject: [PATCH] Minor cleanup of continuation git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5780 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb --- New/Shorewall/Config.pm | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/New/Shorewall/Config.pm b/New/Shorewall/Config.pm index 76a61b5a2..35b482404 100644 --- a/New/Shorewall/Config.pm +++ b/New/Shorewall/Config.pm @@ -384,7 +384,7 @@ sub read_a_line { chomp $nextline; # - # Check for continuation + # Continuation # if ( substr( $nextline, -1, 1 ) eq '\\' ) { $line .= substr( $nextline, 0, -1 ); @@ -392,8 +392,14 @@ sub read_a_line { } $line .= $nextline; - - next if $line =~ /^\s*$/; # Ignore ( concatenated ) Blank Lines + + # + # Ignore ( concatenated ) Blank Lines + # + if ( $line =~ /^\s*$/ ) { + $line = ''; + next; + } # # Ignore ( concatenated ) lines that are nothing but comments #