X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fauthor%2Fpod_coverage.t;h=7544c2cd239e9b4bde8923377ab7ba4853ae58a5;hb=2fee26f19eb97613d727e5b04ad9563639d7348b;hp=f5d36ffde388676322fe165405efae40753666c5;hpb=ccd4cff9a83030a1d8d0f94e6617145d6755c798;p=gitmo%2FMoose.git diff --git a/xt/author/pod_coverage.t b/xt/author/pod_coverage.t index f5d36ff..7544c2c 100644 --- a/xt/author/pod_coverage.t +++ b/xt/author/pod_coverage.t @@ -14,18 +14,25 @@ my @modules = all_modules(); plan tests => scalar @modules; my %trustme = ( - 'Moose' => ['make_immutable'], + 'Moose::Exporter' => ['unimport'], 'Moose::Meta::Attribute' => [ qw( interpolate_class throw_error attach_to_class ) ], - 'Moose::Meta::Class' => [ + 'Moose::Meta::Attribute::Native::MethodProvider::Array' => ['.+'], + 'Moose::Meta::Attribute::Native::MethodProvider::Bool' => ['.+'], + 'Moose::Meta::Attribute::Native::MethodProvider::Code' => ['.+'], + 'Moose::Meta::Attribute::Native::MethodProvider::Counter' => ['.+'], + 'Moose::Meta::Attribute::Native::MethodProvider::Hash' => ['.+'], + 'Moose::Meta::Attribute::Native::MethodProvider::String' => ['.+'], + 'Moose::Meta::Class' => [ qw( check_metaclass_compatibility construct_instance create_error raise_error + reinitialize superclasses ) ], @@ -54,13 +61,16 @@ my %trustme = ( 'Moose::Meta::Role' => [ qw( alias_method get_method_modifier_list + reinitialize reset_package_cache_flag update_package_cache_flag wrap_method_body ) ], - 'Moose::Meta::Role::Composite' => ['add_method'], - 'Moose::Role' => [ + 'Moose::Meta::Mixin::AttributeCore' => ['.+'], + 'Moose::Meta::Role::Composite' => + [ 'get_method', 'get_method_list', 'has_method', 'add_method' ], + 'Moose::Role' => [ qw( after around augment @@ -68,7 +78,6 @@ my %trustme = ( extends has inner - make_immutable override super with ) @@ -79,11 +88,14 @@ my %trustme = ( 'Moose::Meta::TypeConstraint::Class' => [qw( equals is_a_type_of is_a_subtype_of )], 'Moose::Meta::TypeConstraint::Enum' => [qw( constraint equals )], + 'Moose::Meta::TypeConstraint::DuckType' => + [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::Util::TypeConstraints' => ['find_or_create_type_constraint'], );