You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
19 lines
542 B
19 lines
542 B
5 years ago
|
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;
|
||
|
|
}
|
||
|
|
#
|