Remove Perl diagnostic

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-03-19 07:46:45 -07:00
parent 2026fdab6a
commit 962b1cca1f

View File

@ -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;