diff options
author | Tony Cook <tony@develop-help.com> | 2016-06-27 16:21:21 +1000 |
---|---|---|
committer | Steve Hay <steve.m.hay@googlemail.com> | 2016-07-25 10:12:21 +0100 |
commit | d5892636c6daa6fb272c24255447ea3904e4612a (patch) | |
tree | 421f104409bd161711ff5fc95cfde721b77c64e0 /cpan/IO-Compress | |
parent | 420d0f46a0e26de0c764259c7584efa63532fe0b (diff) | |
download | perl-d5892636c6daa6fb272c24255447ea3904e4612a.tar.gz |
cpan/: remove . from @INC when loading optional modules
Diffstat (limited to 'cpan/IO-Compress')
-rw-r--r-- | cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm b/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm index eab345916a..92a04a45d9 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm @@ -27,6 +27,8 @@ Exporter::export_ok_tags('all'); BEGIN { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; eval ' use IO::Uncompress::Adapter::Inflate 2.069 ;'; eval ' use IO::Uncompress::Adapter::Bunzip2 2.069 ;'; eval ' use IO::Uncompress::Adapter::LZO 2.069 ;'; |