In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/7ab791555672f50a01181f675c399d278879e60e?hp=95670bde8957add23fdad6b1c9da76ef317f788f>
- Log ----------------------------------------------------------------- commit 7ab791555672f50a01181f675c399d278879e60e Author: Chris 'BinGOs' Williams <[email protected]> Date: Sat Mar 17 23:50:17 2012 +0000 Update CPANPLUS to CPAN version 0.9121 This resolves a regression introduced with v0.9109 which was included with perl version v5.15.2 and is therefore a regression since v5.14.x [DELTA] Changes for 0.9121 Sat Mar 17 23:23:42 2012 ================================================ * Resolved a regression with dev '_' version numbers since 0.9109 ----------------------------------------------------------------------- Summary of changes: Porting/Maintainers.pl | 2 +- cpan/CPANPLUS/lib/CPANPLUS.pm | 2 +- cpan/CPANPLUS/lib/CPANPLUS/Internals.pm | 2 +- cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils.pm | 1 + cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm | 2 +- 5 files changed, 5 insertions(+), 4 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index bf02e5f..eb4156d 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -448,7 +448,7 @@ use File::Glob qw(:case); 'CPANPLUS' => { 'MAINTAINER' => 'kane', - 'DISTRIBUTION' => 'BINGOS/CPANPLUS-0.9120.tar.gz', + 'DISTRIBUTION' => 'BINGOS/CPANPLUS-0.9121.tar.gz', 'FILES' => q[cpan/CPANPLUS], 'EXCLUDED' => [ qr{^inc/}, diff --git a/cpan/CPANPLUS/lib/CPANPLUS.pm b/cpan/CPANPLUS/lib/CPANPLUS.pm index 5297487..e1fc6ef 100644 --- a/cpan/CPANPLUS/lib/CPANPLUS.pm +++ b/cpan/CPANPLUS/lib/CPANPLUS.pm @@ -13,7 +13,7 @@ BEGIN { use vars qw( @EXPORT @ISA $VERSION ); @EXPORT = qw( shell fetch get install ); @ISA = qw( Exporter ); - $VERSION = "0.9120"; #have to hardcode or cpan.org gets unhappy + $VERSION = "0.9121"; #have to hardcode or cpan.org gets unhappy } ### purely for backward compatibility, so we can call it from the commandline: diff --git a/cpan/CPANPLUS/lib/CPANPLUS/Internals.pm b/cpan/CPANPLUS/lib/CPANPLUS/Internals.pm index 3dde367..e9f97bf 100644 --- a/cpan/CPANPLUS/lib/CPANPLUS/Internals.pm +++ b/cpan/CPANPLUS/lib/CPANPLUS/Internals.pm @@ -42,7 +42,7 @@ use vars qw[@ISA $VERSION]; CPANPLUS::Internals::Report ]; -$VERSION = "0.9120"; +$VERSION = "0.9121"; =pod diff --git a/cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils.pm b/cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils.pm index afd4725..e9651ed 100644 --- a/cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils.pm +++ b/cpan/CPANPLUS/lib/CPANPLUS/Internals/Utils.pm @@ -200,6 +200,7 @@ sub _version_to_number { check( $tmpl, \%hash ) or return; + $version =~ s!_!!g; # *sigh* return $version if $version =~ /^\d*(?:\.\d+)?$/; if ( my ($vers) = $version =~ /^(v?\d+(?:\.\d+(?:\.\d+)?)?)/ ) { return eval { version->parse($vers)->numify }; diff --git a/cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm b/cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm index 04e9775..56dce06 100644 --- a/cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm +++ b/cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm @@ -26,7 +26,7 @@ local $Data::Dumper::Indent = 1; # for dumpering from ! BEGIN { use vars qw[ $VERSION @ISA ]; @ISA = qw[ CPANPLUS::Shell::_Base::ReadLine ]; - $VERSION = "0.9120"; + $VERSION = "0.9121"; } load CPANPLUS::Shell; -- Perl5 Master Repository
