diff --git a/lib/API/Std.pm b/lib/API/Std.pm index 3dc4854..2ce1725 100644 --- a/lib/API/Std.pm +++ b/lib/API/Std.pm @@ -485,7 +485,10 @@ sub err ## no critic qw(Subroutines::ProhibitBuiltinHomonyms) } # If it's a fatal error, exit the program. - if ($fatal) { exit; } + if ($fatal) { + API::Std::event_run('on_shutdown'); + exit; + } return 1; }