From 3c4a854366d7aafaae68992e728551d2c6239f0f Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Wed, 9 May 2007 15:24:09 +0000
Subject: [PATCH] Fix "!" optimization bypass

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6300 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 aafab8a06..91ef1b1a4 100644
--- a/Shorewall-perl/Shorewall/Rules.pm
+++ b/Shorewall-perl/Shorewall/Rules.pm
@@ -1174,7 +1174,7 @@ sub process_rule ( $$$$$$$$$$ ) {
 
     my $action = isolate_basic_target $target;
 
-    $optimize = 0 if $action =~ /!^/;
+    $optimize = 0 if $action =~ /!$/;
 
     if ( $source eq 'all' ) {
 	for my $zone ( @zones ) {