diff --git a/Shorewall/Perl/Shorewall/Rules.pm b/Shorewall/Perl/Shorewall/Rules.pm index 99627ca34..72c5740c2 100644 --- a/Shorewall/Perl/Shorewall/Rules.pm +++ b/Shorewall/Perl/Shorewall/Rules.pm @@ -848,8 +848,8 @@ sub process_macro ( $$$$$$$$$$$$$$$$$ ) { clear_comment unless $nocomment; return $generated; - } + # # Once a rule has been expanded via wildcards (source and/or dest zone eq 'all'), it is processed by this function. If # the target is a macro, the macro is expanded and this function is called recursively for each rule in the expansion. @@ -1085,6 +1085,9 @@ sub process_rule_common ( $$$$$$$$$$$$$$$$ ) { my ( $chain, $policy ); if ( $inaction ) { + # + # We are generating rules in an action chain -- the chain name is the name of the action chain + # $chain = $chainref->{name}; } else { unless ( $actiontype & NATONLY ) {