diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index 5dae92582..485da6348 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -1674,7 +1674,6 @@ sub copy1( $ ) { if ( $script || $debug ) { my ( $do_indent, $here_documents ) = ( 1, ''); - my $save_ifstack = $ifstack; open_file( $_[0] ); @@ -1771,13 +1770,6 @@ sub copy1( $ ) { } } - if ( $ifstack < @ifstack ) { - $currentlinenumber = 'EOF'; - fatal_error "Missing ?ENDIF to match the ?IF at line $ifstack[-1]->[3]"; - } else { - $ifstack = $save_ifstack; - } - close_file; } } @@ -2265,11 +2257,6 @@ sub read_a_line(;$$$$) { } } - if ( @ifstack > $ifstack ) { - $currentlinenumber = 'EOF'; - fatal_error "Missing ?ENDIF to match the ?IF at line $ifstack[-1]->[3]"; - } - close_file; } }