diff options
| author | Edmund von der Burg <evdb@ecclestoad.co.uk> | 2011-02-07 11:03:13 -0300 |
|---|---|---|
| committer | Edmund von der Burg <evdb@ecclestoad.co.uk> | 2011-02-07 11:03:13 -0300 |
| commit | f87390b2dd4dd1b57f122426b23a1080c1e86c93 (patch) | |
| tree | 874114dd5b7672d2c043ad1fc63e4e7b9a1f40fb | |
| parent | 64555174b30416bfa599b1633dd9c6baff40ab01 (diff) | |
Throw an 'Error' instead of 'die'
| -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); |