From 9e87a2793d49e1a8bc923687f68e7372fea228eb Mon Sep 17 00:00:00 2001 From: Chris 'BinGOs' Williams Date: Sat, 10 Dec 2011 20:45:47 +0000 Subject: [PATCH] Update CPANPLUS to CPAN version 0.9113 [DELTA] Changes for 0.9113 Fri Dec 9 16:05:07 2011 ================================================ * Add more detail and reason for NA to NA reports --- Porting/Maintainers.pl | 2 +- cpan/CPANPLUS/lib/CPANPLUS.pm | 2 +- cpan/CPANPLUS/lib/CPANPLUS/Internals.pm | 2 +- cpan/CPANPLUS/lib/CPANPLUS/Internals/Report.pm | 11 +++++++++++ cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm | 2 +- pod/perldelta.pod | 4 ++++ 6 files changed, 19 insertions(+), 4 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index b344db3..007af42 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -463,7 +463,7 @@ use File::Glob qw(:case); 'CPANPLUS' => { 'MAINTAINER' => 'kane', - 'DISTRIBUTION' => 'BINGOS/CPANPLUS-0.9112.tar.gz', + 'DISTRIBUTION' => 'BINGOS/CPANPLUS-0.9113.tar.gz', 'FILES' => q[cpan/CPANPLUS], 'EXCLUDED' => [ qr{^inc/}, qr{^t/dummy-.*\.hidden$}, diff --git a/cpan/CPANPLUS/lib/CPANPLUS.pm b/cpan/CPANPLUS/lib/CPANPLUS.pm index e5b04fd..6e2ae0c 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.9112"; #have to hardcode or cpan.org gets unhappy + $VERSION = "0.9113"; #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 b52cbf9..f428e3f 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.9112"; +$VERSION = "0.9113"; =pod diff --git a/cpan/CPANPLUS/lib/CPANPLUS/Internals/Report.pm b/cpan/CPANPLUS/lib/CPANPLUS/Internals/Report.pm index 73a2d29..ec237d1 100644 --- a/cpan/CPANPLUS/lib/CPANPLUS/Internals/Report.pm +++ b/cpan/CPANPLUS/lib/CPANPLUS/Internals/Report.pm @@ -507,9 +507,20 @@ sub _send_report { $message .= REPORT_TESTS_SKIPPED->(); } elsif( $grade eq GRADE_NA) { + ### add the reason for the NA to the buffer + $buffer = join $/, $buffer, map { + '[' . $_->tag . '] [' . $_->when . '] ' . + $_->message } ( CPANPLUS::Error->stack )[-1]; + ### the bit where we inform what went wrong $message .= REPORT_MESSAGE_FAIL_HEADER->( $stage, $buffer ); + ### add a list of what modules have been loaded of your prereqs list + $message .= REPORT_LOADED_PREREQS->($mod); + + ### add a list of versions of toolchain modules + $message .= REPORT_TOOLCHAIN_VERSIONS->($mod); + ### the footer $message .= REPORT_MESSAGE_FOOTER->(); diff --git a/cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm b/cpan/CPANPLUS/lib/CPANPLUS/Shell/Default.pm index ef9a927..e56ce68 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.9112"; + $VERSION = "0.9113"; } load CPANPLUS::Shell; diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 42b71f6..e5d254f 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -248,6 +248,10 @@ L has been upgraded from version 2.042 to version 2.045. =item * +L has been upgraded from version 0.9112 to version 0.9113. + +=item * + L has been upgraded from version 2.134 to 2.135. The XS implementation has been updated to account for the Unicode symbol -- 2.7.4