Commit 1a6c3002 authored by Richard Levitte's avatar Richard Levitte
Browse files

Configure death handler: bail out early when run in eval block

parent 61ac9fc5
Loading
Loading
Loading
Loading
+1 −0
Original line number Diff line number Diff line
@@ -2722,6 +2722,7 @@ exit(0);
# Death handler, to print a helpful message in case of failure #######
#
sub death_handler {
    die @_ if $^S;
    my $build_file = $target{build_file} // "build file";
    print STDERR <<"_____";