diff options
| -rw-r--r-- | perllib/Page.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index 35d7fb523..b3f320f5d 100644 --- a/perllib/Page.pm +++ b/perllib/Page.pm @@ -439,8 +439,10 @@ sub send_email { # Could not send email - die if ( !$email_sent_successfully ) { - die "Could not send email to '$recipient_email_address' " - . "using either EvEl or local MTA."; + throw Error::Simple( + "Could not send email to '$recipient_email_address' " + . "using either EvEl or local MTA." + ); } my ($action, $worry); |