SKIP: {
skip
'no conflicts module found to check against'
, 1;
}
my
$breaks
= {
"Test::Mojo::Role::OpenAPI::Modern"
=>
"< 0.007"
};
my
$reqs
= CPAN::Meta::Requirements->new;
$reqs
->add_string_requirement(
$_
,
$breaks
->{
$_
})
foreach
keys
%$breaks
;
our
$result
= CPAN::Meta::Check::check_requirements(
$reqs
,
'conflicts'
);
if
(
my
@breaks
=
grep
defined
$result
->{
$_
},
keys
%$result
) {
diag colored(
'Breakages found with OpenAPI-Modern:'
,
'yellow'
);
diag colored(
"$result->{$_}"
,
'yellow'
)
for
sort
@breaks
;
diag
"\n"
, colored(
'You should now update these modules!'
,
'yellow'
);
}
pass
'checked x_breaks data'
;