diff options
| -rwxr-xr-x | Porting/Maintainers.pl | 2 | ||||
| -rw-r--r-- | cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build.pm | 22 | ||||
| -rw-r--r-- | cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build/Constants.pm | 2 |
3 files changed, 13 insertions, 13 deletions
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 8198cabd34..b9bc394dbc 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -444,7 +444,7 @@ use File::Glob qw(:case); 'CPANPLUS::Dist::Build' => { 'MAINTAINER' => 'bingos', - 'DISTRIBUTION' => 'BINGOS/CPANPLUS-Dist-Build-0.44.tar.gz', + 'DISTRIBUTION' => 'BINGOS/CPANPLUS-Dist-Build-0.46.tar.gz', 'FILES' => q[cpan/CPANPLUS-Dist-Build], 'EXCLUDED' => [ qr{^inc/}, qw{ t/99_pod.t diff --git a/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build.pm b/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build.pm index 2bb5070815..0f27639cda 100644 --- a/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build.pm +++ b/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build.pm @@ -30,7 +30,7 @@ use Locale::Maketext::Simple Class => 'CPANPLUS', Style => 'gettext'; local $Params::Check::VERBOSE = 1; -$VERSION = '0.44'; +$VERSION = '0.46'; =pod @@ -403,19 +403,19 @@ sub _find_prereqs { } } - else { - my $file = File::Spec->catfile( $dir, '_build', 'prereqs' ); - return unless -f $file; - my $fh = FileHandle->new(); + my $file = File::Spec->catfile( $dir, '_build', 'prereqs' ); + return unless -f $file; - unless( $fh->open( $file ) ) { - error( loc( "Cannot open '%1': %2", $file, $! ) ); - return; - } - - $content = do { local $/; <$fh> }; + my $fh = FileHandle->new(); + + unless( $fh->open( $file ) ) { + error( loc( "Cannot open '%1': %2", $file, $! ) ); + return; } + + $content = do { local $/; <$fh> }; + } return unless $content; diff --git a/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build/Constants.pm b/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build/Constants.pm index 6fc6a18300..1ac02108e4 100644 --- a/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build/Constants.pm +++ b/cpan/CPANPLUS-Dist-Build/lib/CPANPLUS/Dist/Build/Constants.pm @@ -9,7 +9,7 @@ BEGIN { require Exporter; use vars qw[$VERSION @ISA @EXPORT]; - $VERSION = '0.44'; + $VERSION = '0.46'; @ISA = qw[Exporter]; @EXPORT = qw[ BUILD_DIR BUILD ]; } |