Move a comment

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-04-06 08:00:20 -07:00
parent 334394a5d4
commit 24e115d0f9

View File

@ -1995,10 +1995,10 @@ sub embedded_perl( $ ) {
} }
unless (my $return = eval $command ) { unless (my $return = eval $command ) {
#
# Perl found the script offensive or the script itself died
#
if ( $@ ) { if ( $@ ) {
#
# Perl found the script offensive or the script itself died
#
$@ =~ s/, <\$currentfile> line \d+//g; $@ =~ s/, <\$currentfile> line \d+//g;
fatal_error1 "$@"; fatal_error1 "$@";
} }