diff options
| -rw-r--r-- | ext/Storable/MANIFEST | 1 | ||||
| -rw-r--r-- | ext/Storable/Storable.pm | 5 | ||||
| -rw-r--r-- | ext/Storable/t/sig_die.t | 0 |
3 files changed, 5 insertions, 1 deletions
diff --git a/ext/Storable/MANIFEST b/ext/Storable/MANIFEST index 37415e557b..c12ecb56fd 100644 --- a/ext/Storable/MANIFEST +++ b/ext/Storable/MANIFEST @@ -25,6 +25,7 @@ t/integer.t For "use integer" testing t/interwork56.t Test combatibility kludge for 64bit data under 5.6.x t/just_plain_nasty.t Corner case corner. t/lock.t See if Storable works +t/sig_die.t See if Storable works t/make_56_interwork.pl Make test data for interwork56.t t/make_downgrade.pl Make test data for downgrade.t t/malice.t See if Storable copes with corrupt files diff --git a/ext/Storable/Storable.pm b/ext/Storable/Storable.pm index 51e4f9cda8..69e9f5139f 100644 --- a/ext/Storable/Storable.pm +++ b/ext/Storable/Storable.pm @@ -28,7 +28,10 @@ $VERSION = '2.15'; # Use of Log::Agent is optional # -eval "use Log::Agent"; +{ + local $SIG{__DIE__}; + eval "use Log::Agent"; +} require Carp; diff --git a/ext/Storable/t/sig_die.t b/ext/Storable/t/sig_die.t new file mode 100644 index 0000000000..e69de29bb2 --- /dev/null +++ b/ext/Storable/t/sig_die.t |