Update Module-Build to CPAN version 0.4205
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Sun, 9 Feb 2014 21:33:57 +0000 (21:33 +0000)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Sun, 9 Feb 2014 21:33:57 +0000 (21:33 +0000)
  [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]

26 files changed:
Porting/Maintainers.pl
cpan/Module-Build/lib/Module/Build.pm
cpan/Module-Build/lib/Module/Build/Base.pm
cpan/Module-Build/lib/Module/Build/Compat.pm
cpan/Module-Build/lib/Module/Build/Config.pm
cpan/Module-Build/lib/Module/Build/ConfigData.pm
cpan/Module-Build/lib/Module/Build/Cookbook.pm
cpan/Module-Build/lib/Module/Build/Dumper.pm
cpan/Module-Build/lib/Module/Build/ModuleInfo.pm
cpan/Module-Build/lib/Module/Build/Notes.pm
cpan/Module-Build/lib/Module/Build/PPMMaker.pm
cpan/Module-Build/lib/Module/Build/Platform/Default.pm
cpan/Module-Build/lib/Module/Build/Platform/MacOS.pm
cpan/Module-Build/lib/Module/Build/Platform/Unix.pm
cpan/Module-Build/lib/Module/Build/Platform/VMS.pm
cpan/Module-Build/lib/Module/Build/Platform/VOS.pm
cpan/Module-Build/lib/Module/Build/Platform/Windows.pm
cpan/Module-Build/lib/Module/Build/Platform/aix.pm
cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm
cpan/Module-Build/lib/Module/Build/Platform/darwin.pm
cpan/Module-Build/lib/Module/Build/Platform/os2.pm
cpan/Module-Build/lib/Module/Build/PodParser.pm
cpan/Module-Build/lib/inc/latest.pm
cpan/Module-Build/lib/inc/latest/private.pm
cpan/Module-Build/t/lib/MBTest.pm
t/porting/customized.dat

index 06b265e..afcff2f 100755 (executable)
@@ -792,7 +792,7 @@ use File::Glob qw(:case);
     #
 
     'Module::Build' => {
-        'DISTRIBUTION' => 'LEONT/Module-Build-0.4204.tar.gz',
+        'DISTRIBUTION' => 'LEONT/Module-Build-0.4205.tar.gz',
         'FILES'        => q[cpan/Module-Build],
         'EXCLUDED'     => [
             qw( t/par.t
index c004f94..aee7b44 100644 (file)
@@ -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
index 758a881..84e137f 100644 (file)
@@ -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;
index f204f7e..11bbf11 100644 (file)
@@ -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;
index 1296190..69bec80 100644 (file)
@@ -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;
 
index 9a2b549..ec72359 100644 (file)
@@ -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
index 02a4f8d..08d10b3 100644 (file)
@@ -1,7 +1,7 @@
 package Module::Build::Cookbook;
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.4204';
+$VERSION = '0.4205';
 
 
 =head1 NAME
index 18d6e18..d70a38e 100644 (file)
@@ -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:
index 07e6ba9..2e14831 100644 (file)
@@ -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;
index d06e13f..bd4a249 100644 (file)
@@ -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;
index cc1c0fc..3ffa32e 100644 (file)
@@ -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
index d62fa41..8a9cf8b 100644 (file)
@@ -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;
 
index 22a0f2f..7e12ca1 100644 (file)
@@ -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);
index be552e6..ec13ebe 100644 (file)
@@ -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;
 }
index 96c7fc7..5b06baa 100644 (file)
@@ -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;
index f18e86a..19dfcee 100644 (file)
@@ -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;
 
index 5dcc0bb..7744177 100644 (file)
@@ -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;
index e69d20d..c51e100 100644 (file)
@@ -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;
 
index 011f7b4..19bd50d 100644 (file)
@@ -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;
 
index 904d0e8..c7e6902 100644 (file)
@@ -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;
 
index 020af03..5f9ad18 100644 (file)
@@ -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;
 
index be1b520..c7e83a8 100644 (file)
@@ -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);
 
index 810aa9a..5834e24 100644 (file)
@@ -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;
index 693f875..c3829ca 100644 (file)
@@ -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;
index c988527..b12dc50 100644 (file)
@@ -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 {};
 
index 539a230..c114a87 100644 (file)
@@ -1,7 +1,7 @@
 Config::Perl::V cpan/Config-Perl-V/t/20_plv510.t 7263a40dcbaf1ee447f0209d3bbc029cc747c959
 Config::Perl::V cpan/Config-Perl-V/t/21_plv518.t ec23f4e34fb2f84f63f5588ad4a577530dbef5d2
 Digest::MD5 cpan/Digest-MD5/t/files.t bdbe05b705d9da305fedce7a9f4b6ba63250c7cf
-Module::Build cpan/Module-Build/lib/Module/Build/ConfigData.pm c12eec359dba0cf6118f958fb98ddebdaa3787b9
+Module::Build cpan/Module-Build/lib/Module/Build/ConfigData.pm 85eb9656e68d1f256737dc52d86b5d0fed28f832
 PerlIO::via::QuotedPrint cpan/PerlIO-via-QuotedPrint/t/QuotedPrint.t ca39f0146e89de02c746e199c45dcb3e5edad691
 Text::Balanced cpan/Text-Balanced/t/01_compile.t 1598cf491a48fa546260a2ec41142abe84da533d
 Text::Balanced cpan/Text-Balanced/t/02_extbrk.t 6ba1b64a4604e822dc2260b8ffcea6b406339ee8