diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2014-02-09 21:33:57 +0000 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2014-02-09 21:33:57 +0000 |
commit | 3a3ee363aabfd679b63d9486cf6aa053f4825457 (patch) | |
tree | 5c091620596db049c9bb0c9a6a027851fb611c6c /cpan | |
parent | 5ce19fcf9b06ef678cf66fa882e5b9296294b8e0 (diff) | |
download | perl-3a3ee363aabfd679b63d9486cf6aa053f4825457.tar.gz |
Update Module-Build to CPAN version 0.4205
[DELTA]
0.4205 - Sun Feb 9 17:51:22 CET 2014
[BUG FIXES]
- FIX license code regression for artistic license [Roy Ivy III, Leon Timmermans]
- Don't swallow ExtUtils::CBuilder loading errors [Matthew Horsfall, Leon Timmermans]
- Handle testing on cross-compile builds [Brian Fraser]
- Protect against platforms without getpw{nam,uid} [Brian Fraser]
Diffstat (limited to 'cpan')
24 files changed, 78 insertions, 61 deletions
diff --git a/cpan/Module-Build/lib/Module/Build.pm b/cpan/Module-Build/lib/Module/Build.pm index c004f94cfe..aee7b44c1f 100644 --- a/cpan/Module-Build/lib/Module/Build.pm +++ b/cpan/Module-Build/lib/Module/Build.pm @@ -18,7 +18,7 @@ use Module::Build::Base; use vars qw($VERSION @ISA); @ISA = qw(Module::Build::Base); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; # Inserts the given module into the @ISA hierarchy between diff --git a/cpan/Module-Build/lib/Module/Build/Base.pm b/cpan/Module-Build/lib/Module/Build/Base.pm index 758a8813fd..84e137fb4f 100644 --- a/cpan/Module-Build/lib/Module/Build/Base.pm +++ b/cpan/Module-Build/lib/Module/Build/Base.pm @@ -6,7 +6,7 @@ use strict; use vars qw($VERSION); use warnings; -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; BEGIN { require 5.006001 } @@ -4388,8 +4388,8 @@ BEGIN { *scripts = \&script_files; } perl => 'Perl_5', apache => 'Apache_2_0', apache_1_1 => 'Apache_1_1', - artistic => 'Artistic_1_0', - artistic_2 => 'Artistic_2_0', + artistic => 'Artistic_1', + artistic_2 => 'Artistic_2', lgpl => 'LGPL_2_1', lgpl2 => 'LGPL_2_1', lgpl3 => 'LGPL_3_0', @@ -4435,21 +4435,30 @@ BEGIN { *scripts = \&script_files; } } } -# use mapping or license name directly -sub _software_license_object { - my ($self) = @_; - return unless defined( my $license = $self->license ); - - my $class; +sub _software_license_class { + my ($self, $license) = @_; + if ($self->valid_licenses->{$license} && eval { require Software::LicenseUtils; Software::LicenseUtils->VERSION(0.103009) }) { + my ($class) = Software::LicenseUtils->guess_license_from_meta_key($license, 1); + eval "require $class"; + #die $class; + return $class; + } LICENSE: for my $l ( $self->valid_licenses->{ $license }, $license ) { next unless defined $l; my $trial = "Software::License::" . $l; if ( eval "require Software::License; Software::License->VERSION(0.014); require $trial; 1" ) { - $class = $trial; - last LICENSE; + return $trial; } } - return unless defined $class; + return; +} + +# use mapping or license name directly +sub _software_license_object { + my ($self) = @_; + return unless defined( my $license = $self->license ); + + my $class = $self->_software_license_class($license) or return; # Software::License requires a 'holder' argument my $author = join( " & ", @{ $self->dist_author }) || 'unknown'; @@ -5339,7 +5348,7 @@ sub have_c_compiler { return $p->{_have_c_compiler} if defined $p->{_have_c_compiler}; $self->log_verbose("Checking if compiler tools configured... "); - my $b = eval { $self->cbuilder }; + my $b = $self->cbuilder; my $have = $b && eval { $b->have_compiler }; $self->log_verbose($have ? "ok.\n" : "failed.\n"); return $p->{_have_c_compiler} = $have; diff --git a/cpan/Module-Build/lib/Module/Build/Compat.pm b/cpan/Module-Build/lib/Module/Build/Compat.pm index f204f7e83d..11bbf11b4a 100644 --- a/cpan/Module-Build/lib/Module/Build/Compat.pm +++ b/cpan/Module-Build/lib/Module/Build/Compat.pm @@ -2,7 +2,7 @@ package Module::Build::Compat; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; use File::Basename (); use File::Spec; diff --git a/cpan/Module-Build/lib/Module/Build/Config.pm b/cpan/Module-Build/lib/Module/Build/Config.pm index 1296190655..69bec80543 100644 --- a/cpan/Module-Build/lib/Module/Build/Config.pm +++ b/cpan/Module-Build/lib/Module/Build/Config.pm @@ -2,7 +2,7 @@ package Module::Build::Config; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Config; diff --git a/cpan/Module-Build/lib/Module/Build/ConfigData.pm b/cpan/Module-Build/lib/Module/Build/ConfigData.pm index 9a2b549499..ec72359cd0 100644 --- a/cpan/Module-Build/lib/Module/Build/ConfigData.pm +++ b/cpan/Module-Build/lib/Module/Build/ConfigData.pm @@ -167,44 +167,44 @@ do{ my $x = [ {}, {}, { + 'dist_authoring' => { + 'requires' => { + 'Archive::Tar' => '1.09' + }, + 'description' => 'Create new distributions', + 'recommends' => { + 'Pod::Readme' => '0.04', + 'Module::Signature' => '0.21' + } + }, + 'HTML_support' => { + 'requires' => { + 'Pod::Html' => 0 + }, + 'description' => 'Create HTML documentation' + }, 'manpage_support' => { - 'description' => 'Create Unix man pages', 'requires' => { 'Pod::Man' => 0 - } + }, + 'description' => 'Create Unix man pages' }, 'license_creation' => { - 'description' => 'Create licenses automatically in distributions', 'requires' => { - 'Software::License' => 0 - } + 'Software::License' => '0.103009' + }, + 'description' => 'Create licenses automatically in distributions' }, 'PPM_support' => { 'description' => 'Generate PPM files for distributions' }, 'inc_bundling_support' => { 'requires' => { - 'ExtUtils::Install' => '1.54', - 'ExtUtils::Installed' => '1.999' + 'ExtUtils::Installed' => '1.999', + 'ExtUtils::Install' => '1.54' }, 'description' => 'Bundle Module::Build in inc/' - }, - 'dist_authoring' => { - 'description' => 'Create new distributions', - 'recommends' => { - 'Module::Signature' => '0.21', - 'Pod::Readme' => '0.04' - }, - 'requires' => { - 'Archive::Tar' => '1.09' - } - }, - 'HTML_support' => { - 'description' => 'Create HTML documentation', - 'requires' => { - 'Pod::Html' => 0 - } - } + } } ]; $x; }
\ No newline at end of file diff --git a/cpan/Module-Build/lib/Module/Build/Cookbook.pm b/cpan/Module-Build/lib/Module/Build/Cookbook.pm index 02a4f8d2b3..08d10b3ceb 100644 --- a/cpan/Module-Build/lib/Module/Build/Cookbook.pm +++ b/cpan/Module-Build/lib/Module/Build/Cookbook.pm @@ -1,7 +1,7 @@ package Module::Build::Cookbook; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; =head1 NAME diff --git a/cpan/Module-Build/lib/Module/Build/Dumper.pm b/cpan/Module-Build/lib/Module/Build/Dumper.pm index 18d6e18623..d70a38e5ae 100644 --- a/cpan/Module-Build/lib/Module/Build/Dumper.pm +++ b/cpan/Module-Build/lib/Module/Build/Dumper.pm @@ -1,7 +1,7 @@ package Module::Build::Dumper; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; # This is just a split-out of a wrapper function to do Data::Dumper # stuff "the right way". See: diff --git a/cpan/Module-Build/lib/Module/Build/ModuleInfo.pm b/cpan/Module-Build/lib/Module/Build/ModuleInfo.pm index 07e6ba9052..2e1483154d 100644 --- a/cpan/Module-Build/lib/Module/Build/ModuleInfo.pm +++ b/cpan/Module-Build/lib/Module/Build/ModuleInfo.pm @@ -4,7 +4,7 @@ package Module::Build::ModuleInfo; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; require Module::Metadata; diff --git a/cpan/Module-Build/lib/Module/Build/Notes.pm b/cpan/Module-Build/lib/Module/Build/Notes.pm index d06e13ffd9..bd4a2491b2 100644 --- a/cpan/Module-Build/lib/Module/Build/Notes.pm +++ b/cpan/Module-Build/lib/Module/Build/Notes.pm @@ -4,7 +4,7 @@ package Module::Build::Notes; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Data::Dumper; use Module::Build::Dumper; diff --git a/cpan/Module-Build/lib/Module/Build/PPMMaker.pm b/cpan/Module-Build/lib/Module/Build/PPMMaker.pm index cc1c0fc453..3ffa32ef32 100644 --- a/cpan/Module-Build/lib/Module/Build/PPMMaker.pm +++ b/cpan/Module-Build/lib/Module/Build/PPMMaker.pm @@ -4,7 +4,7 @@ use strict; use Config; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; # This code is mostly borrowed from ExtUtils::MM_Unix 6.10_03, with a diff --git a/cpan/Module-Build/lib/Module/Build/Platform/Default.pm b/cpan/Module-Build/lib/Module/Build/Platform/Default.pm index d62fa41ceb..8a9cf8b0a7 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/Default.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/Default.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::Default; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Base; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/MacOS.pm b/cpan/Module-Build/lib/Module/Build/Platform/MacOS.pm index 22a0f2fdb6..7e12ca12fa 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/MacOS.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/MacOS.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::MacOS; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Base; use vars qw(@ISA); diff --git a/cpan/Module-Build/lib/Module/Build/Platform/Unix.pm b/cpan/Module-Build/lib/Module/Build/Platform/Unix.pm index be552e6697..ec13ebea9b 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/Unix.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/Unix.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::Unix; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Base; @@ -43,8 +43,8 @@ sub _detildefy { my ($self, $value) = @_; $value =~ s[^~([^/]+)?(?=/|$)] # tilde with optional username [$1 ? - ((getpwnam $1)[7] || "~$1") : - ($ENV{HOME} || (getpwuid $>)[7]) + (eval{(getpwnam $1)[7]} || "~$1") : + ($ENV{HOME} || eval{(getpwuid $>)[7]} || glob("~")) ]ex; return $value; } diff --git a/cpan/Module-Build/lib/Module/Build/Platform/VMS.pm b/cpan/Module-Build/lib/Module/Build/Platform/VMS.pm index 96c7fc7bf1..5b06baa5f8 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/VMS.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/VMS.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::VMS; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Base; use Config; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/VOS.pm b/cpan/Module-Build/lib/Module/Build/Platform/VOS.pm index f18e86aa66..19dfceeaf0 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/VOS.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/VOS.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::VOS; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Base; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/Windows.pm b/cpan/Module-Build/lib/Module/Build/Platform/Windows.pm index 5dcc0bbc8f..7744177450 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/Windows.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/Windows.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::Windows; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Config; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/aix.pm b/cpan/Module-Build/lib/Module/Build/Platform/aix.pm index e69d20d348..c51e1002e6 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/aix.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/aix.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::aix; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Platform::Unix; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm b/cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm index 011f7b4a7b..19bd50db8b 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::cygwin; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Platform::Unix; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/darwin.pm b/cpan/Module-Build/lib/Module/Build/Platform/darwin.pm index 904d0e8cec..c7e690241c 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/darwin.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/darwin.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::darwin; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Platform::Unix; diff --git a/cpan/Module-Build/lib/Module/Build/Platform/os2.pm b/cpan/Module-Build/lib/Module/Build/Platform/os2.pm index 020af03f0e..5f9ad187db 100644 --- a/cpan/Module-Build/lib/Module/Build/Platform/os2.pm +++ b/cpan/Module-Build/lib/Module/Build/Platform/os2.pm @@ -2,7 +2,7 @@ package Module::Build::Platform::os2; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Module::Build::Platform::Unix; diff --git a/cpan/Module-Build/lib/Module/Build/PodParser.pm b/cpan/Module-Build/lib/Module/Build/PodParser.pm index be1b52021c..c7e83a837d 100644 --- a/cpan/Module-Build/lib/Module/Build/PodParser.pm +++ b/cpan/Module-Build/lib/Module/Build/PodParser.pm @@ -2,7 +2,7 @@ package Module::Build::PodParser; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use vars qw(@ISA); diff --git a/cpan/Module-Build/lib/inc/latest.pm b/cpan/Module-Build/lib/inc/latest.pm index 810aa9a1e3..5834e248ea 100644 --- a/cpan/Module-Build/lib/inc/latest.pm +++ b/cpan/Module-Build/lib/inc/latest.pm @@ -4,7 +4,7 @@ use if $] >= 5.019, 'deprecate'; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use Carp; diff --git a/cpan/Module-Build/lib/inc/latest/private.pm b/cpan/Module-Build/lib/inc/latest/private.pm index 693f875a02..c3829ca80a 100644 --- a/cpan/Module-Build/lib/inc/latest/private.pm +++ b/cpan/Module-Build/lib/inc/latest/private.pm @@ -4,7 +4,7 @@ use if $] >= 5.019, 'deprecate'; use strict; use vars qw($VERSION); -$VERSION = '0.4204'; +$VERSION = '0.4205'; $VERSION = eval $VERSION; use File::Spec; diff --git a/cpan/Module-Build/t/lib/MBTest.pm b/cpan/Module-Build/t/lib/MBTest.pm index c988527f88..b12dc50e76 100644 --- a/cpan/Module-Build/t/lib/MBTest.pm +++ b/cpan/Module-Build/t/lib/MBTest.pm @@ -197,7 +197,15 @@ sub find_in_path { } sub check_compiler { - return (1,1) if $ENV{PERL_CORE}; + if ($ENV{PERL_CORE}) { + require IPC::Cmd; + if ( $Config{usecrosscompile} && !IPC::Cmd::can_run($Config{cc}) ) { + return; + } + else { + return(1,1); + } + } local $SIG{__WARN__} = sub {}; |