diff --git a/Shorewall/Perl/Shorewall/Zones.pm b/Shorewall/Perl/Shorewall/Zones.pm index b4e834837..378c7471e 100644 --- a/Shorewall/Perl/Shorewall/Zones.pm +++ b/Shorewall/Perl/Shorewall/Zones.pm @@ -456,10 +456,10 @@ sub process_zone( \$ ) { if ( $zoneref->{options}{in_out}{blacklist} ) { for ( qw/in out/ ) { - if ( $zoneref->{options}{$_}{blacklist} ) { - warning_message( "Redundant 'blacklist' in " . uc( $_ ) . '_OPTIONS' ); - } else { + unless ( $zoneref->{options}{$_}{blacklist} ) { $zoneref->{options}{$_}{blacklist} = 1; + } else { + warning_message( "Redundant 'blacklist' in " . uc( $_ ) . '_OPTIONS' ); } } }