diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index 4c1a59b6d..6cf15ab27 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -1565,7 +1565,7 @@ sub process_conditional( $$ ) { fatal_error "Invalid ?ENDIF" unless $rest eq ''; fatal_error q(Unexpected "?ENDIF" without matching ?IF or ?ELSE) if @ifstack <= $ifstack; $omitting = $lastomit; - @{pop @ifstack}; + pop @ifstack; } $omitting;