extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-12-17 03:40:53 +01:00
Code Issues Packages Projects Releases Wiki Activity

Fix number of columns detection -- Take 2

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@8340 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2008-03-22 17:41:12 +00:00
parent bd5f8195e9
commit 5ea18e3624
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Shorewall-perl/Shorewall/Config.pm
View File

@ -909,7 +909,7 @@ sub split_line( $$$ ) {
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;
@ -937,7 +937,7 @@ sub split_line1( $$$ ) {
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;
@ -980,7 +980,7 @@ sub split_line2( $$$ ) {
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;