diff options
author | Tony Cook <tony@develop-help.com> | 2016-06-21 10:02:02 +1000 |
---|---|---|
committer | Steve Hay <steve.m.hay@googlemail.com> | 2016-07-25 10:12:16 +0100 |
commit | 5f66e9fffdc3d0c6e0846cd1f11298e70c786c30 (patch) | |
tree | 2519637590bcb600e4ca59ae6f029e72e3dc2487 /cpan/Digest-SHA | |
parent | 46b7ac49cca5dd8c4b20bdc00d54042dfa9e069a (diff) | |
download | perl-5f66e9fffdc3d0c6e0846cd1f11298e70c786c30.tar.gz |
(perl #127834) remove . from the end of @INC if complex modules are loaded
While currently Encode and Storable are know to attempt to load modules
not included in the core, updates to other modules may lead to those
also attempting to load new modules, so be safe and remove . for those
as well.
Diffstat (limited to 'cpan/Digest-SHA')
-rw-r--r-- | cpan/Digest-SHA/shasum | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/cpan/Digest-SHA/shasum b/cpan/Digest-SHA/shasum index 14ddd606af..62a2b0ec3c 100644 --- a/cpan/Digest-SHA/shasum +++ b/cpan/Digest-SHA/shasum @@ -13,6 +13,7 @@ ## "-0" option for reading bit strings, and ## "-p" option for portable digests (to be deprecated). +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use warnings; use Fcntl; |