Skip to content

Commit 42d6504

Browse files
committed
fix testing for when CPAN::Meta not available
1 parent dd10796 commit 42d6504

File tree

2 files changed

+4
-3
lines changed

2 files changed

+4
-3
lines changed

t/meta_convert.t

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -4,9 +4,8 @@ use strict;
44
use warnings;
55

66
BEGIN { unshift @INC, 't/lib'; }
7-
use Test::More;
8-
eval { require CPAN::Meta; };
9-
plan skip_all => 'Failed to load CPAN::Meta' if $@;
7+
use Test::More eval { require CPAN::Meta; } ? ()
8+
: (skip_all => 'Failed to load CPAN::Meta');
109
use File::Temp qw[tempdir];
1110
require ExtUtils::MM_Any;
1211

t/metafile_data.t

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -358,6 +358,7 @@ SKIP: {
358358
skip 'Loading Parse::CPAN::Meta failed', 5 unless $PCM;
359359
my $meta = $mm->mymeta("t/META_for_testing_tricky_version.yml");
360360
is $meta->{'meta-spec'}{version}, 2, "internally, our MYMETA struct is v2";
361+
skip 'Loading CPAN::Meta failed', 4 unless $CM;
361362
in_dir {
362363
$mm->write_mymeta($meta);
363364
ok -e "MYMETA.yml";
@@ -372,6 +373,7 @@ SKIP: {
372373
note "A bad license string";
373374
SKIP: {
374375
skip 'Loading Parse::CPAN::Meta failed', 2 unless $PCM;
376+
skip 'Loading CPAN::Meta failed', 2 unless $CM;
375377
my $mm = $new_mm->(
376378
@GENERIC_IN,
377379
LICENSE => 'death and retribution',

0 commit comments

Comments
 (0)