# This is a stripped down version of all_pod_coverage_ok which lets us
# vary the trustme parameter per module.
-my @modules = grep { !/Accessor::Native.*$/ } all_modules();
+my @modules
+ = grep { !/Accessor::Native.*$/ && !/::Conflicts$/ } all_modules();
plan tests => scalar @modules;
my %trustme = (
'Class::MOP' => [
'DEBUG_NO_META',
'HAVE_ISAREV',
+ 'IS_RUNNING_ON_5_10',
'subname',
'in_global_destruction',
+ 'check_package_cache_flag',
+ 'load_first_existing_class',
+ 'is_class_loaded',
+ 'load_class',
],
'Class::MOP::Attribute' => ['process_accessors'],
'Class::MOP::Class' => [
'Class::MOP::Mixin::AttributeCore' => ['.+'],
'Class::MOP::Mixin::HasAttributes' => ['.+'],
'Class::MOP::Mixin::HasMethods' => ['.+'],
- 'Class::MOP::Module' => ['create'],
'Class::MOP::Package' => [ 'get_method_map', 'wrap_method_body' ],
+ 'Moose' => ['init_meta', 'throw_error'],
'Moose::Error::Confess' => ['new'],
+ 'Moose::Error::Util' => ['.+'],
'Moose::Meta::Attribute' => [
qw( interpolate_class
throw_error
generate_reader_method_inline
generate_writer_method
generate_writer_method_inline
+ new
)
],
'Moose::Meta::Method::Constructor' => [
'Moose::Meta::Mixin::AttributeCore' => ['.+'],
'Moose::Meta::Role::Composite' =>
[ 'get_method', 'get_method_list', 'has_method', 'add_method' ],
+ 'Moose::Object' => ['BUILDALL', 'DEMOLISHALL'],
'Moose::Role' => [
qw( after
around
inner
override
super
- with )
+ with
+ init_meta )
],
'Moose::Meta::TypeCoercion' => ['compile_type_coercion'],
'Moose::Meta::TypeCoercion::Union' => ['compile_type_coercion'],
- 'Moose::Meta::TypeConstraint' => ['compile_type_constraint'],
+ 'Moose::Meta::TypeConstraint' => [qw( compile_type_constraint inlined )],
'Moose::Meta::TypeConstraint::Class' =>
[qw( equals is_a_type_of is_a_subtype_of )],
'Moose::Meta::TypeConstraint::Enum' => [qw( constraint equals )],
'Moose::Meta::TypeConstraint::Parameterizable' => ['.+'],
'Moose::Meta::TypeConstraint::Parameterized' => ['.+'],
'Moose::Meta::TypeConstraint::Role' => [qw( equals is_a_type_of )],
- 'Moose::Meta::TypeConstraint::Union' =>
- [qw( compile_type_constraint coercion has_coercion)],
+ 'Moose::Meta::TypeConstraint::Union' => [
+ qw( compile_type_constraint
+ coercion
+ has_coercion
+ can_be_inlined
+ inline_environment )
+ ],
'Moose::Util' => ['add_method_modifier'],
'Moose::Util::MetaRole' => ['apply_metaclass_roles'],
'Moose::Util::TypeConstraints' => ['find_or_create_type_constraint'],
+ 'Moose::Util::TypeConstraints::Builtins' => ['.+'],
);
for my $module ( sort @modules ) {