From 6d57e7a0ce243522b873d04bf360e392cd8e5f27 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Sun, 21 Apr 2013 14:44:30 -0700 Subject: [PATCH] Mark a rule as complex if an option value is a reference. Signed-off-by: Tom Eastep --- Shorewall/Perl/Shorewall/Chains.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm index 945994f7d..b99e6c1e2 100644 --- a/Shorewall/Perl/Shorewall/Chains.pm +++ b/Shorewall/Perl/Shorewall/Chains.pm @@ -788,6 +788,7 @@ sub set_rule_option( $$$ ) { assert( defined $value && reftype $ruleref , $value, $ruleref ); $ruleref->{simple} = 0; + $ruleref->{complex} = 1 if reftype $value; my $opttype = $opttype{$option} || MATCH;