diff options
| author |   afresh1 <afresh1@openbsd.org> | 2014-11-17 20:52:31 +0000 |
|---|---|---|
| committer | afresh1 <afresh1@openbsd.org> | 2014-11-17 20:52:31 +0000 |
| commit | 6fb12b7054efc6b436584db6cef9c2f85c0d7e27 (patch) | |
| tree | aa09a524574ec7ae2f521a24573deeecb78ff66a /gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm | |
| parent | Add the Cammelia cipher to libcrypto. (diff) | |
| download | wireguard-openbsd-6fb12b7054efc6b436584db6cef9c2f85c0d7e27.tar.xz wireguard-openbsd-6fb12b7054efc6b436584db6cef9c2f85c0d7e27.zip | |
Import perl-5.20.1
Diffstat (limited to 'gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm')
| -rw-r--r-- | gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm b/gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm index 2a62c57d088..c3829ca80ac 100644 --- a/gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm +++ b/gnu/usr.bin/perl/cpan/Module-Build/lib/inc/latest/private.pm @@ -1,11 +1,13 @@ package inc::latest::private; + +use if $] >= 5.019, 'deprecate'; + use strict; use vars qw($VERSION); -$VERSION = '0.4003'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use File::Spec; -use IO::File; # must ultimately "goto" the import routine of the module to be loaded # so that the calling package is correct when $mod->import() runs. @@ -60,10 +62,9 @@ sub _search_bundled { my $mypath = 'inc'; - local *DH; # Maintain 5.005 compatibility - opendir DH, $mypath or die "Can't open directory $mypath: $!"; + opendir my $DH, $mypath or die "Can't open directory $mypath: $!"; - while (defined(my $e = readdir DH)) { + while (defined(my $e = readdir $DH)) { next unless $e =~ /^inc_/; my $try = File::Spec->catfile($mypath, $e, $file); |