mirror of
https://gitlab.com/shorewall/code.git
synced 2025-06-28 21:51:46 +02:00
Correct handling of ?SECTION
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
parent
d63262a0cb
commit
e5d250750b
@ -3319,7 +3319,7 @@ sub read_a_line($) {
|
|||||||
}
|
}
|
||||||
|
|
||||||
$currentline = '';
|
$currentline = '';
|
||||||
} elsif ( ( $options & DO_SECTION ) && $currentline =~ /^s*\??SECTION\s+(.*)/i ) {
|
} elsif ( ( $options & DO_SECTION ) && $currentline =~ /^\s*\?SECTION\s+(.*)/i ) {
|
||||||
my $sectionname = $1;
|
my $sectionname = $1;
|
||||||
fatal_error "Invalid SECTION name ($sectionname)" unless $sectionname =~ /^[-_\da-zA-Z]+$/;
|
fatal_error "Invalid SECTION name ($sectionname)" unless $sectionname =~ /^[-_\da-zA-Z]+$/;
|
||||||
fatal_error "This file does not allow ?SECTION" unless $section_function;
|
fatal_error "This file does not allow ?SECTION" unless $section_function;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user