extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-13 13:16:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

Make 'none' case-insensitive in policy action specifications

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2017-02-10 11:43:51 -08:00
parent 09fda9eb6c
commit 977fa81d46
No known key found for this signature in database
GPG Key ID: 96E6B3F2423A4D10
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Shorewall/Perl/Shorewall/Rules.pm
View File

@ -571,8 +571,8 @@ sub process_policy_actions( $$$ ) {
if ( supplied $pactions ) { if ( supplied $pactions ) {
my @pactions; my @pactions;
if ( $pactions ne 'none' ) { if ( lc $pactions ne 'none' ) {
@pactions = @{$policy_actions{policy}} if $pactions =~ s/^\+//; @pactions = @{$policy_actions{$policy}} if $pactions =~ s/^\+//;
for my $paction ( split_list3( $pactions, 'Policy Action' ) ) { for my $paction ( split_list3( $pactions, 'Policy Action' ) ) {
my ( $action, $level, $remainder ) = split( /:/, $paction, 3 ); my ( $action, $level, $remainder ) = split( /:/, $paction, 3 );