From 9e921beb49782afdbaee7dcb6fbd567edf7c38b1 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Fri, 11 Feb 2011 16:53:49 -0800
Subject: [PATCH] Fix a tri-value bug

---
 Shorewall/Perl/Shorewall/Config.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm
index 91e42ecf5..43f8dbf9f 100644
--- a/Shorewall/Perl/Shorewall/Config.pm
+++ b/Shorewall/Perl/Shorewall/Config.pm
@@ -2022,9 +2022,10 @@ sub default_log_level( $$ ) {
 #
 sub check_trivalue( $$ ) {
     my ( $var, $default) = @_;
-    my $val = lc( $config{$var} || '' );
+    my $val = $config{$var};
 
     if ( defined $val ) {
+	$val = lc $val;
 	if ( $val eq 'yes' || $val eq 'on' ) {
 	    $config{$var} = 'on';
 	} elsif ( $val eq 'no' || $val eq 'off' ) {