diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index ba514d723..b54bcd22e 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -1958,7 +1958,7 @@ sub embedded_shell( $ ) { while ( read_a_line( 0, 0, 0, 0 ) ) { last if $last = $currentline =~ s/^\s*END(\s+SHELL)?\s*;?//; - $command .= $currentline; + $command .= "$currentline\n"; } fatal_error ( "Missing END SHELL" ) unless $last; @@ -1992,7 +1992,7 @@ sub embedded_perl( $ ) { while ( read_a_line( 0, 0, 0, 0 ) ) { last if $last = $currentline =~ s/^\s*END(\s+PERL)?\s*;?//; - $command .= $currentline; + $command .= "$currentline\n"; } fatal_error ( "Missing END PERL" ) unless $last;