use Test::More;
-eval "use Test::Pod::Coverage 1.04";
-plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
+use Test::Requires {
+ 'Test::Pod::Coverage' => '1.04', # skip all if not installed
+};
# This is a stripped down version of all_pod_coverage_ok which lets us
# vary the trustme parameter per module.
-my @modules = all_modules();
+my @modules = grep { !/Accessor::Native.+$/ } all_modules();
plan tests => scalar @modules;
my %trustme = (
- 'Moose::Exporter' => ['unimport'],
'Moose::Meta::Attribute' => [
qw( interpolate_class
throw_error
[qw( constraint equals get_message )],
'Moose::Meta::TypeConstraint::Parameterizable' => ['.+'],
'Moose::Meta::TypeConstraint::Parameterized' => ['.+'],
- 'Moose::Meta::TypeConstraint::Role' => [qw( equals is_a_type_of )],
- 'Moose::Meta::TypeConstraint::Union' => ['compile_type_constraint'],
- 'Moose::Util' => ['add_method_modifier'],
- 'Moose::Util::MetaRole' => ['apply_metaclass_roles'],
+ 'Moose::Meta::TypeConstraint::Role' => [qw( equals is_a_type_of )],
+ 'Moose::Meta::TypeConstraint::Union' =>
+ [qw( compile_type_constraint coercion has_coercion)],
+ 'Moose::Util' => ['add_method_modifier'],
+ 'Moose::Util::MetaRole' => ['apply_metaclass_roles'],
'Moose::Util::TypeConstraints' => ['find_or_create_type_constraint'],
);
for my $module ( sort @modules ) {
+
my $trustme = [];
if ( $trustme{$module} ) {
my $methods = join '|', @{ $trustme{$module} };