diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index 1925b7128..93b41dac4 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -1803,7 +1803,7 @@ sub embedded_perl( $ ) { # sub push_action_params( $$ ) { my @params = split /,/, $_[1]; - my $oldparams = \@actparms; + my @oldparams = @actparms; @actparms = (); @@ -1815,7 +1815,7 @@ sub push_action_params( $$ ) { $actparms[$i] = $val eq '-' ? '' : $val eq '--' ? '-' : $val; } - $oldparams; + \@oldparams; } sub pop_action_params( $ ) {