holm/shorewall_code
1
0
Fork 0
forked from extern/shorewall_code
Code Pull Requests Activity

Correct handling of columns with embedded spaces

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2013-12-29 08:56:14 -08:00
parent 8b49641e07
commit c8866ef8bf
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

@ -2003,7 +2003,7 @@ sub split_columns( $ ) {
if ( $element eq '' ) {
$element = $_;
} else {
$element = join( ',', $element, $_ );
$element = join( ' ', $element, $_ );
}
if ( ( $count = tr/)/)/ ) > 0 ) {
@ -2015,7 +2015,7 @@ sub split_columns( $ ) {
}
}
} elsif ( ( $count = tr/)/)/ ) > 0 ) {
$element = join (',', $element, $_ );
$element = join (' ', $element, $_ );
if ( ! ( $opencount -= $count ) ) {
push @list2 , $element;
$element = '';
@ -2025,7 +2025,7 @@ sub split_columns( $ ) {
} elsif ( $element eq '' ) {
push @list2 , $_;
} else {
$element = join ',', $element , $_;
$element = join ' ', $element , $_;
}
}