1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
use Test::More;
# Skip if doing a regular install
plan skip_all => "Author tests not required for installation"
unless ( $ENV{AUTOMATED_TESTING} );
eval "use Test::YAML::Meta";
plan skip_all => "Test::YAML::Meta required for testing META.yml" if $@;
plan no_plan;
my $yaml = meta_spec_ok(undef,undef,@_);
is($yaml->{version},$Test::YAML::Meta::VERSION,
'META.yml distribution version matches');
if($yaml->{provides}) {
for my $mod (keys %{$yaml->{provides}}) {
is($yaml->{provides}{$mod}{version},$Test::YAML::Meta::VERSION,
"META.yml entry [$mod] version matches");
}
}
|
