Pass tests even in absence of CPAN::Meta

Author: Leont

lib/Module/Build/Base.pm

@@ -1900,7 +1900,7 @@ sub create_mymeta {
   }
 
   # Try loading META.json or META.yml
-  if ( $self->try_require("CPAN::Meta", "2.110420") ) {
+  if ( $self->try_require("CPAN::Meta", "2.142060") ) {
     for my $file ( @metafiles ) {
       next unless -f $file;
       $meta_obj = eval { CPAN::Meta->load_file($file, { lazy_validation => 0 }) };
@@ -4546,7 +4546,7 @@ sub _write_meta_files {
 sub _get_meta_object {
   my $self = shift;
   my %args = @_;
-  return unless $self->try_require("CPAN::Meta", "2.110420");
+  return unless $self->try_require("CPAN::Meta", "2.142060");
 
   my $meta;
   eval {

t/extend.t

@@ -178,7 +178,8 @@ print "Hello, World!\n";
   is $mb->bar, 'yow';
 }
 
-{
+SKIP: {
+  skip 'Need CPAN::Meta 2.142060 for Meta support', 4 if not eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) };
   # Test the meta_add and meta_merge stuff
   ok my $mb = Module::Build->new(
 				  module_name => $dist->name,

t/metadata.t

@@ -2,7 +2,14 @@
 
 use strict;
 use lib 't/lib';
-use MBTest tests => 14;
+use MBTest;
+
+if (eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) }) {
+	plan(tests => 14);
+}
+else {
+	plan(skip_all => 'No or old CPAN::Meta');
+}
 
 blib_load('Module::Build');
 blib_load('Module::Build::ConfigData');

t/metadata2.t

@@ -2,7 +2,14 @@
 
 use strict;
 use lib 't/lib';
-use MBTest tests => 18;
+use MBTest;
+
+if (eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) }) {
+	plan(tests => 18);
+}
+else {
+	plan(skip_all => 'No or old CPAN::Meta');
+}
 
 blib_load('Module::Build');
 blib_load('Module::Build::ConfigData');

t/mymeta.t

@@ -3,10 +3,15 @@
 use strict;
 use lib 't/lib';
 use MBTest;
-use CPAN::Meta 2.110420;
-use CPAN::Meta::YAML;
-use Parse::CPAN::Meta 1.4401;
-plan tests => 41;
+
+if (eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) }) {
+	plan(tests => 41);
+	require CPAN::Meta::YAML;
+	require Parse::CPAN::Meta;
+}
+else {
+	plan(skip_all => 'No or old CPAN::Meta');
+}
 
 blib_load('Module::Build');
 

t/properties/license.t

@@ -3,7 +3,14 @@ use lib 't/lib';
 use MBTest;
 use DistGen;
 
-plan 'no_plan';
+if (eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) }) {
+	plan('no_plan');
+	require CPAN::Meta::YAML;
+	require Parse::CPAN::Meta;
+}
+else {
+	plan(skip_all => 'No or old CPAN::Meta');
+}
 
 # Ensure any Module::Build modules are loaded from correct directory
 blib_load('Module::Build');

t/runthrough.t

@@ -124,11 +124,14 @@ ok grep {$_ eq 'save_out'     } $mb->cleanup;
   # else it could get into the tarball
   ok ! -e File::Spec->catdir('Simple-0.01', 'blib');
 
-  # Make sure all of the above was done by the new version of Module::Build
-  open(my $fh, '<', File::Spec->catfile($dist->dirname, 'META.yml'));
-  my $contents = do {local $/; <$fh>};
-  $contents =~ /Module::Build version ([0-9_.]+)/m;
-  cmp_ok $1, '==', $mb->VERSION, "Check version used to create META.yml: $1 == " . $mb->VERSION;
+  SKIP: {
+    skip 'CPAN::Meta 2.142060+ not installed', 1 if not eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) };
+    # Make sure all of the above was done by the new version of Module::Build
+    open(my $fh, '<', File::Spec->catfile($dist->dirname, 'META.yml'));
+    my $contents = do {local $/; <$fh>};
+    $contents =~ /Module::Build version ([0-9_.]+)/m;
+    cmp_ok $1, '==', $mb->VERSION, "Check version used to create META.yml: $1 == " . $mb->VERSION;
+  }
 
   SKIP: {
     skip( "Archive::Tar 1.08+ not installed", 1 )

t/script_dist.t

@@ -73,7 +73,9 @@ my $result;
 stdout_stderr_of( sub { $result = $mb->dispatch('distmeta') } );
 ok $result;
 
-my $yml = CPAN::Meta::YAML->read_string(slurp('META.yml'))->[0];
-is_deeply($yml->{provides}, \%meta_provides);
+if (eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060); }) {
+	my $yml = CPAN::Meta::YAML->read_string(slurp('META.yml'))->[0];
+	is_deeply($yml->{provides}, \%meta_provides);
+}
 
 $dist->chdir_original if $dist->did_chdir;

t/test_reqs.t

@@ -6,7 +6,16 @@ use MBTest;
 use CPAN::Meta 2.110420;
 use CPAN::Meta::YAML;
 use Parse::CPAN::Meta 1.4401;
-plan tests => 4;
+
+if (eval { require CPAN::Meta; CPAN::Meta->VERSION(2.142060) }) {
+	plan(tests => 4);
+	require CPAN::Meta::YAML;
+	require Parse::CPAN::Meta;
+}
+else {
+	plan(skip_all => 'No or old CPAN::Meta');
+}
+
 
 blib_load('Module::Build');