mirror of
https://gitlab.com/shorewall/code.git
synced 2025-01-30 01:19:36 +01:00
Minor cleanup of continuation
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5780 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
parent
8aceb0e890
commit
e8ff0cb961
@ -384,7 +384,7 @@ sub read_a_line {
|
|||||||
|
|
||||||
chomp $nextline;
|
chomp $nextline;
|
||||||
#
|
#
|
||||||
# Check for continuation
|
# Continuation
|
||||||
#
|
#
|
||||||
if ( substr( $nextline, -1, 1 ) eq '\\' ) {
|
if ( substr( $nextline, -1, 1 ) eq '\\' ) {
|
||||||
$line .= substr( $nextline, 0, -1 );
|
$line .= substr( $nextline, 0, -1 );
|
||||||
@ -392,8 +392,14 @@ sub read_a_line {
|
|||||||
}
|
}
|
||||||
|
|
||||||
$line .= $nextline;
|
$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
|
# Ignore ( concatenated ) lines that are nothing but comments
|
||||||
#
|
#
|
||||||
|
Loading…
Reference in New Issue
Block a user