From ad57272c7f1cf7d430c780847bb3a38b7adcaf6b Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Wed, 5 Jan 2011 17:21:50 -0800
Subject: [PATCH] Fix tag handling in Limit()

---
 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 122b49b04..07d211353 100644
--- a/Shorewall/Perl/Shorewall/Rules.pm
+++ b/Shorewall/Perl/Shorewall/Rules.pm
@@ -609,7 +609,7 @@ sub Limit( $$$$ ) {
 
     if ( $level ne '' ) {
 	my $xchainref = new_chain 'filter' , "$chainref->{name}%";
-	log_rule_limit $level, $xchainref, $param[0], 'DROP', $tag, '', 'add', '';
+	log_rule_limit $level, $xchainref, $param[0], 'DROP', '', $tag, 'add', '';
 	add_rule $xchainref, '-j DROP';
 	add_jump $chainref,  $xchainref, 0, "-m recent --name $set --update --seconds $param[2] --hitcount $count ";
     } else {