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

Another Perl 5.12 issue

Browse Source
This commit is contained in:
Tom Eastep 2010-11-18 20:12:13 -08:00
parent 63e5f6aff9
commit 407b92829f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Shorewall/Perl/Shorewall/Config.pm
View File

@ -2074,7 +2074,7 @@ sub default_log_level( $$ ) {
#
sub check_trivalue( $$ ) {
my ( $var, $default) = @_;
my $val = "\L$config{$var}";
my $val = lc( $config{$var} || '' );
if ( defined $val ) {
if ( $val eq 'yes' || $val eq 'on' ) {