This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Upgrade Module-Build to 0.4002
authorSteve Hay <steve.m.hay@googlemail.com>
Thu, 9 Aug 2012 12:41:46 +0000 (13:41 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Thu, 9 Aug 2012 12:41:46 +0000 (13:41 +0100)
33 files changed:
Porting/Maintainers.pl
cpan/Module-Build/Changes
cpan/Module-Build/bin/config_data
cpan/Module-Build/lib/Module/Build.pm
cpan/Module-Build/lib/Module/Build/API.pod
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/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/Amiga.pm
cpan/Module-Build/lib/Module/Build/Platform/Default.pm
cpan/Module-Build/lib/Module/Build/Platform/EBCDIC.pm
cpan/Module-Build/lib/Module/Build/Platform/MPEiX.pm
cpan/Module-Build/lib/Module/Build/Platform/MacOS.pm
cpan/Module-Build/lib/Module/Build/Platform/RiscOS.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/metadata.t
cpan/Module-Build/t/pod_parser.t
cpan/Module-Build/t/use_tap_harness.t

index 2def238..d2c10ff 100755 (executable)
@@ -1244,14 +1244,13 @@ use File::Glob qw(:case);
 
     'Module::Build' => {
         'MAINTAINER'   => 'kwilliams',
-        'DISTRIBUTION' => 'LEONT/Module-Build-0.40.tar.gz',
+        'DISTRIBUTION' => 'LEONT/Module-Build-0.4002.tar.gz',
         'FILES'        => q[cpan/Module-Build],
         'EXCLUDED'     => [
             qw( t/par.t
                 t/signature.t
                 ),
             qr{^contrib/},
-            qr{^devtools},
             qr{^inc},
         ],
         'CUSTOMIZED' => ['lib/Module/Build/ConfigData.pm'],
index f5b158c..67f5e5a 100644 (file)
@@ -1,5 +1,32 @@
 Revision history for Perl extension Module::Build.
 
+0.4002 - Fri Jul 27 20:04:09 EEST 2012
+
+  [BUG FIXES]
+
+  - Test for TAP::Harness version properly
+
+  - Install to 'site' on 5.12+
+
+  [DOCUMENTATION]
+
+  - Document extra_{compiler|linker}_flags accessors [Nick Wellnhofer]
+
+0.4001 - Tue Jun 26 20:54:15 CEST 2012
+  [BUG FIXES]
+
+  - Parse Pod name a litte more leniently [Paul Evans]
+
+  [DOCUMENTATION]
+
+  - Various spelling fixes [Leon Timmermans, Jonathan Yu]
+
+  - Fixes configuration keys used for script location [Leon Timmermans, reported by Samuel Ferencik]
+
+  [OTHER]
+
+  - use warnings
+
 0.40 - Fri Feb 24 18:47:48 CET 2012
 
   - Released 0.39_02 as 0.40 without any code changes
index 40c8ea4..fcd5c4d 100644 (file)
@@ -162,13 +162,13 @@ Koenig (C<CPAN::Config>), Jon Swartz (C<HTML::Mason::Config>), Andy
 Wardley (C<Template::Config>), and Larry Wall (perl's own Config.pm)
 have developed independently.
 
-The configuration system emplyed here was developed in the context of
+The configuration system employed here was developed in the context of
 C<Module::Build>.  Under this system, configuration information for a
 module C<Foo>, for example, is stored in a module called
 C<Foo::ConfigData>) (I would have called it C<Foo::Config>, but that
 was taken by all those other systems mentioned in the previous
 paragraph...).  These C<...::ConfigData> modules contain the
-configuration data, as well as publically accessible methods for
+configuration data, as well as publicly accessible methods for
 querying and setting (yes, actually re-writing) the configuration
 data.  The C<config_data> script (whose docs you are currently
 reading) is merely a front-end for those methods.  If you wish, you
index 69fd77f..a0760f1 100644 (file)
@@ -16,7 +16,7 @@ use Module::Build::Base;
 
 use vars qw($VERSION @ISA);
 @ISA = qw(Module::Build::Base);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 
 
@@ -878,7 +878,7 @@ parameter as follows:
 
   lib     => installprivlib  installsitelib      installvendorlib
   arch    => installarchlib  installsitearch     installvendorarch
-  script  => installscript   installsitebin      installvendorbin
+  script  => installscript   installsitescript   installvendorscript
   bin     => installbin      installsitebin      installvendorbin
   bindoc  => installman1dir  installsiteman1dir  installvendorman1dir
   libdoc  => installman3dir  installsiteman3dir  installvendorman3dir
index 2760673..4980218 100644 (file)
@@ -630,7 +630,7 @@ specify explicitly.
 [version 0.36]
 
 The C<needs_compiler> parameter indicates whether a compiler is required to
-build the distsribution.  The default is false, unless XS files are found or
+build the distribution.  The default is false, unless XS files are found or
 the C<c_source> parameter is set, in which case it is true.  If true,
 L<ExtUtils::CBuilder> is automatically added to C<build_requires> if needed.
 
@@ -1400,6 +1400,22 @@ characters will do their special things.  If you supply multiple
 arguments, no shell will get involved and the command will be executed
 directly.
 
+=item extra_compiler_flags()
+
+=item extra_compiler_flags(@flags)
+
+[version 0.25]
+
+Set or retrieve the extra compiler flags. Returns an arrayref of flags.
+
+=item extra_linker_flags()
+
+=item extra_linker_flags(@flags)
+
+[version 0.25]
+
+Set or retrieve the extra linker flags. Returns an arrayref of flags.
+
 =item feature($name)
 
 =item feature($name => $value)
index 795ed91..4689447 100644 (file)
@@ -4,9 +4,11 @@ package Module::Build::Base;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+use warnings;
+
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
-BEGIN { require 5.00503 }
+BEGIN { require 5.006001 }
 
 use Carp;
 use Cwd ();
@@ -1640,6 +1642,7 @@ sub perl_version_to_float {
 sub _parse_conditions {
   my ($self, $spec) = @_;
 
+  return ">= 0" if not defined $spec;
   if ($spec =~ /^\s*([\w.]+)\s*$/) { # A plain number, maybe with dots, letters, and underscores
     return (">= $spec");
   } else {
index dc8ad70..08f0c3b 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Compat;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 
 use File::Basename ();
 use File::Spec;
index d65f28e..58cd64a 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Config;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Config;
 
index e318a65..2605118 100644 (file)
@@ -1,7 +1,7 @@
 package Module::Build::Cookbook;
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 
 
 =head1 NAME
index 8c2a211..df451a9 100644 (file)
@@ -1,7 +1,7 @@
 package Module::Build::Dumper;
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 
 # This is just a split-out of a wrapper function to do Data::Dumper
 # stuff "the right way".  See:
index 53bd82e..1e4a82b 100644 (file)
@@ -4,7 +4,7 @@ package Module::Build::ModuleInfo;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 
 require Module::Metadata;
index c7611b6..85de8cb 100644 (file)
@@ -4,7 +4,7 @@ package Module::Build::Notes;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Data::Dumper;
 use IO::File;
index c0d6c33..1496b2b 100644 (file)
@@ -5,7 +5,7 @@ use Config;
 use vars qw($VERSION);
 use IO::File;
 
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 
 # This code is mostly borrowed from ExtUtils::MM_Unix 6.10_03, with a
index c83eee7..f2320bb 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::Amiga;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index 2a770dd..df888c5 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::Default;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index ef691ec..c299ef5 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::EBCDIC;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index 681e108..c4d0396 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::MPEiX;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index 2f1034c..3d65a9b 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::MacOS;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 use vars qw(@ISA);
index 75a3c78..5c0bb3c 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::RiscOS;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index 2f34385..53c8c7c 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::Unix;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index b253934..b5344f5 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::VMS;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 use Config;
index e9cf5ee..25e0287 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::VOS;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Base;
 
index b117019..5f6694a 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::Windows;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 
 use Config;
index 9472aab..370a052 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::aix;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Platform::Unix;
 
index 51a9753..ec8a8fa 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::cygwin;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Platform::Unix;
 
index 1e3b094..ad82949 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::darwin;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Platform::Unix;
 
index abe402e..2b28b2f 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::Platform::os2;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use Module::Build::Platform::Unix;
 
index 456f8de..d6724ad 100644 (file)
@@ -2,7 +2,7 @@ package Module::Build::PodParser;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 use vars qw(@ISA);
 
@@ -28,7 +28,8 @@ sub parse_from_filehandle {
   local $_;
   while (<$fh>) {
     next unless /^=(?!cut)/ .. /^=cut/;  # in POD
-    last if ($self->{abstract}) = /^  (?:  [a-z0-9:]+  \s+ - \s+  )  (.*\S)  /ix;
+    # Accept Name - abstract or C<Name> - abstract
+    last if ($self->{abstract}) = /^ (?: [a-z0-9:]+ | [BCIF] < [a-z0-9:]+ > ) \s+ - \s+ (.*\S) /ix;
   }
 
   my @author;
index 8c53ea8..6a9b4b7 100644 (file)
@@ -1,7 +1,7 @@
 package inc::latest;
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 
 use Carp;
@@ -132,7 +132,7 @@ a distribution and are used by Build.PL (or Makefile.PL).
 
 Arguments to C<inc::latest> are module names that are checked against both the
 current C<@INC> array and against specially-named directories in C<inc>.  If
-the bundled verison is newer than the installed one (or the module isn't
+the bundled version is newer than the installed one (or the module isn't
 installed, then, the bundled directory is added to the start of <@INC> and the
 module is loaded from there.
 
@@ -192,7 +192,7 @@ available.  For example:
   my @list = inc::latest->loaded_modules;
 
 This takes no arguments and always returns a list of module names requested for
-loading via "use inc::latest 'MODULE'", regardless of wether the load was
+loading via "use inc::latest 'MODULE'", regardless of whether the load was
 successful or not.
 
 =item write()
index cf7a718..f817ba8 100644 (file)
@@ -1,7 +1,7 @@
 package inc::latest::private;
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.40';
+$VERSION = '0.4002';
 $VERSION = eval $VERSION;
 
 use File::Spec;
index 4401e1a..fac5999 100644 (file)
@@ -63,7 +63,7 @@ my $mb = Module::Build->new_from_context;
 {
   my $mb_prereq = { 'Module::Build' => $Module::Build::VERSION };
   my $mb_config_req = {
-    'Module::Build' => int($Module::Build::VERSION * 100)/100
+    'Module::Build' => sprintf '%2.2f', int($Module::Build::VERSION * 100)/100
   };
   my $node;
   my $output = stdout_stderr_of( sub {
index c47d738..8c75e7d 100644 (file)
@@ -2,7 +2,7 @@
 
 use strict;
 use lib 't/lib';
-use MBTest tests => 9;
+use MBTest tests => 12;
 
 blib_load('Module::Build::PodParser');
 
@@ -88,3 +88,28 @@ EOF
   is $pp->get_author->[0], 'C<Foo::Bar> was written by Engelbert Humperdinck I<E<lt>eh@example.comE<gt>> in 2004.', 'author';
   is $pp->get_abstract, 'Perl extension for blah blah blah', 'abstract';
 }
+
+
+{
+    # Now with C<Module::Name>
+  untie *FH;
+  tie *FH, 'IO::StringBased', <<'EOF';
+=head1 Name
+
+C<Foo::Bar> - Perl extension for blah blah blah
+
+=head1 Author
+
+C<Foo::Bar> was written by Engelbert Humperdinck I<E<lt>eh@example.comE<gt>> in 2004.
+
+Home page: http://example.com/~eh/
+
+=cut
+EOF
+
+  my $pp = Module::Build::PodParser->new(fh => \*FH);
+  ok $pp, 'object created';
+
+  is $pp->get_author->[0], 'C<Foo::Bar> was written by Engelbert Humperdinck I<E<lt>eh@example.comE<gt>> in 2004.', 'author';
+  is $pp->get_abstract, 'Perl extension for blah blah blah', 'abstract';
+}
index f6e7e50..bfce506 100644 (file)
@@ -3,7 +3,7 @@
 use strict;
 use Test::More;
 use lib 't/lib';
-if (eval { require TAP::Harness } && TAP::Harness->VERSION >= 3) {
+if (eval { require TAP::Harness && TAP::Harness->VERSION(3) }) {
     plan tests => 9;
 } else {
     plan skip_all => 'TAP::Harness 3+ not installed'