19 lines
542 B
Diff
19 lines
542 B
Diff
diff -up Storable/Storable.pm.cve Storable/Storable.pm
|
|
--- Storable/Storable.pm.cve 2016-03-19 19:50:47.000000000 +0100
|
|
+++ Storable/Storable.pm 2016-08-03 12:48:36.415082280 +0200
|
|
@@ -25,7 +25,13 @@ use vars qw($canonical $forgive_me $VERS
|
|
$VERSION = '2.56';
|
|
|
|
BEGIN {
|
|
- if (eval { local $SIG{__DIE__}; require Log::Agent; 1 }) {
|
|
+ if (eval {
|
|
+ local $SIG{__DIE__};
|
|
+ local @INC = @INC;
|
|
+ pop @INC if $INC[-1] eq '.';
|
|
+ require Log::Agent;
|
|
+ 1;
|
|
+ }) {
|
|
Log::Agent->import;
|
|
}
|
|
#
|