From c8fa0fcde3a663e0863a5f799dc9b01bb9c3201f Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Sat, 12 May 2007 00:33:48 +0000
Subject: [PATCH] Fix 'logreject' target -- Take 2

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6330 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
---
 Shorewall-perl/Shorewall/Rules.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Shorewall-perl/Shorewall/Rules.pm b/Shorewall-perl/Shorewall/Rules.pm
index 6e3f9668a..830a2734e 100644
--- a/Shorewall-perl/Shorewall/Rules.pm
+++ b/Shorewall-perl/Shorewall/Rules.pm
@@ -191,7 +191,7 @@ sub setup_ecn()
 sub add_rule_pair( $$$$ ) {
     my ($chainref , $predicate , $target , $level ) = @_;
 
-    log_rule $level, $chainref, $target,  , $predicate,  if defined $level && $level ne '';
+    log_rule( $level, $chainref, "\U$target", $predicate )  if defined $level && $level ne '';
     add_rule $chainref , "${predicate}-j $target";
 }