summaryrefslogtreecommitdiff
path: root/cpan/Module-Build/lib/Module/Build/Base.pm
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2013-11-19 13:29:25 +0000
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2013-11-19 13:29:25 +0000
commit6d53d1efddf3b846358e60b4ba7fe871617a2e68 (patch)
treedec2fd3ff97f69be3c5c50c51d5446d055d2899a /cpan/Module-Build/lib/Module/Build/Base.pm
parent34e8ce870edf86c0bd4707c01205875db19be411 (diff)
downloadperl-6d53d1efddf3b846358e60b4ba7fe871617a2e68.tar.gz
Update Module-Build to CPAN version 0.4202
[DELTA] 0.4202 - Tue Nov 19 12:48:19 CET 2013 [BUG FIXES] - Don't merge prereqs from meta to mymeta [Leon Timmermans]
Diffstat (limited to 'cpan/Module-Build/lib/Module/Build/Base.pm')
-rw-r--r--cpan/Module-Build/lib/Module/Build/Base.pm14
1 files changed, 8 insertions, 6 deletions
diff --git a/cpan/Module-Build/lib/Module/Build/Base.pm b/cpan/Module-Build/lib/Module/Build/Base.pm
index 58d3add12a..72bcbae20c 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.4201';
+$VERSION = '0.4202';
$VERSION = eval $VERSION;
BEGIN { require 5.006001 }
@@ -1911,18 +1911,20 @@ sub create_mymeta {
# maybe get a copy in spec v2 format (regardless of original source)
- my $mymeta_obj = $self->_get_meta_object(quiet => 0, dynamic => 0, fatal => 1, auto => 0);
- # if we have metadata, just update it
- if ($meta_obj && $mymeta_obj) {
- my $prereqs = $mymeta_obj->effective_prereqs->with_merged_prereqs($meta_obj->effective_prereqs);
+ my $mymeta_obj;
+ if ($meta_obj) {
+ # if we have metadata, just update it
my %updated = (
%{ $meta_obj->as_struct({ version => 2.0 }) },
- prereqs => $prereqs->as_string_hash,
+ prereqs => $self->_normalize_prereqs,
dynamic_config => 0,
generated_by => "Module::Build version $Module::Build::VERSION",
);
$mymeta_obj = CPAN::Meta->new( \%updated, { lazy_validation => 0 } );
}
+ else {
+ $mymeta_obj = $self->_get_meta_object(quiet => 0, dynamic => 0, fatal => 1, auto => 0);
+ }
my @created = $self->_write_meta_files( $mymeta_obj, 'MYMETA' );