8 eval "use Test::Pod::Coverage 1.04";
9 plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
11 # This is a stripped down version of all_pod_coverage_ok which lets us
12 # vary the trustme parameter per module.
13 my @modules = all_modules();
14 plan tests => scalar @modules;
17 'Class::MOP' => ['HAVE_ISAREV'],
18 'Class::MOP::Attribute' => ['process_accessors'],
19 'Class::MOP::Class' => [
22 'compute_all_applicable_methods',
25 'add_dependent_meta_instance',
26 'add_meta_instance_dependencies',
27 'invalidate_meta_instance',
28 'invalidate_meta_instances',
29 'remove_dependent_meta_instance',
30 'remove_meta_instance_dependencies',
31 'update_meta_instance_dependencies',
33 # effectively internal
34 'check_metaclass_compatibility',
36 'construct_class_instance',
38 'create_immutable_transformer',
39 'create_meta_instance',
40 'get_immutable_options',
41 'reset_package_cache_flag',
42 'update_package_cache_flag',
45 # doc'd under get_all_attributes
46 'compute_all_applicable_attributes',
48 # doc'd with rebless_instance
49 'rebless_instance_away',
52 'Class::MOP::Instance' => [
54 bless_instance_structure
55 is_dependent_on_superclasses ),
58 'Class::MOP::Instance' => [
60 bless_instance_structure
61 is_dependent_on_superclasses ),
64 'Class::MOP::Method::Accessor' => [
65 qw( generate_accessor_method
66 generate_accessor_method_inline
67 generate_clearer_method
68 generate_clearer_method_inline
69 generate_predicate_method
70 generate_predicate_method_inline
71 generate_reader_method
72 generate_reader_method_inline
73 generate_writer_method
74 generate_writer_method_inline
79 'Class::MOP::Method::Constructor' => [
81 generate_constructor_method
82 generate_constructor_method_inline
89 'Class::MOP::Method::Generated' => [
97 'Class::MOP::Module' => ['create'],
100 for my $module ( sort @modules ) {
102 if ( $trustme{$module} ) {
103 my $methods = join '|', @{ $trustme{$module} };
104 $trustme = [qr/^(?:$methods)$/];
108 $module, { trustme => $trustme },
109 "Pod coverage for $module"