mirror of
https://gitlab.com/shorewall/code.git
synced 2024-12-17 20:01:09 +01:00
Fix number of columns detection -- Take 2
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@8340 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
parent
bd5f8195e9
commit
5ea18e3624
@ -909,7 +909,7 @@ sub split_line( $$$ ) {
|
|||||||
|
|
||||||
fatal_error "Invalid $description entry (too many columns)" if $line > $maxcolumns;
|
fatal_error "Invalid $description entry (too many columns)" if $line > $maxcolumns;
|
||||||
|
|
||||||
1 while --$line >= 0 && $line[$line] eq '-';
|
$line-- while $line > 0 && $line[$line-1] eq '-';
|
||||||
|
|
||||||
fatal_error "Invalid $description entry (too few columns)" if $line < $mincolumns;
|
fatal_error "Invalid $description entry (too few columns)" if $line < $mincolumns;
|
||||||
|
|
||||||
@ -937,7 +937,7 @@ sub split_line1( $$$ ) {
|
|||||||
|
|
||||||
fatal_error "Invalid $description entry (too many columns)" if $line > $maxcolumns;
|
fatal_error "Invalid $description entry (too many columns)" if $line > $maxcolumns;
|
||||||
|
|
||||||
1 while --$line >= 0 && $line[$line] eq '-';
|
$line-- while $line > 0 && $line[$line-1] eq '-';
|
||||||
|
|
||||||
fatal_error "Invalid $description entry (too few columns)" if $line < $mincolumns;
|
fatal_error "Invalid $description entry (too few columns)" if $line < $mincolumns;
|
||||||
|
|
||||||
@ -980,7 +980,7 @@ sub split_line2( $$$ ) {
|
|||||||
|
|
||||||
fatal_error "Invalid $description entry (too many columns)" if $line > $maxcolumns;
|
fatal_error "Invalid $description entry (too many columns)" if $line > $maxcolumns;
|
||||||
|
|
||||||
1 while --$line >= 0 && $line[$line] eq '-';
|
$line-- while $line > 0 && $line[$line-1] eq '-';
|
||||||
|
|
||||||
fatal_error "Invalid $description entry (too few columns)" if $line < $mincolumns;
|
fatal_error "Invalid $description entry (too few columns)" if $line < $mincolumns;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user