Change indentation in Carp-generated messages

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6663 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-06-23 22:47:52 +00:00
parent 051cb61050
commit 04b07b605a

View File

@ -325,7 +325,7 @@ sub warning_message
my $lineinfo = $currentfile ? " : $currentfilename (line $currentlinenumber)" : '';
if ( $debug ) {
print STDERR Carp::longmess( "WARNING: @_$lineinfo" );
print STDERR Carp::longmess( " WARNING: @_$lineinfo" );
} else {
print STDERR " WARNING: @_$lineinfo\n";
}
@ -336,9 +336,8 @@ sub warning_message
#
sub fatal_error {
my $lineinfo = $currentfile ? " : $currentfilename (line $currentlinenumber)" : '';
Carp::confess "ERROR: @_$lineinfo" if $debug;
Carp::confess " ERROR: @_$lineinfo" if $debug;
die " ERROR: @_$lineinfo\n";
}
#