File Coverage

t/release-pod-coverage.t
Criterion Covered Total %
statement 3 3 100.0
branch 1 2 50.0
condition n/a
subroutine 1 1 100.0
pod n/a
total 5 6 83.3


line stmt bran cond sub pod time code
1             #!perl
2              
3             BEGIN {
4 1 50   1   5 unless ($ENV{RELEASE_TESTING}) {
5 1         481 require Test::More;
6 1         51970 Test::More::plan(skip_all => 'these tests are for release candidate testing');
7             }
8             }
9              
10             # This file was automatically generated by Dist::Zilla::Plugin::Test::Pod::Coverage::Configurable.
11              
12             use Test::Pod::Coverage 1.08;
13             use Test::More 0.88;
14              
15             BEGIN {
16             if ( $] <= 5.008008 ) {
17             plan skip_all => 'These tests require Pod::Coverage::TrustPod, which only works with Perl 5.8.9+';
18             }
19             }
20             use Pod::Coverage::TrustPod;
21              
22             my %skip = map { $_ => 1 } qw( );
23              
24             my @modules;
25             for my $module ( all_modules() ) {
26             next if $skip{$module};
27              
28             push @modules, $module;
29             }
30              
31             plan skip_all => 'All the modules we found were excluded from POD coverage test.'
32             unless @modules;
33              
34             plan tests => scalar @modules;
35              
36             my %trustme = ();
37              
38             my @also_private;
39              
40             for my $module ( sort @modules ) {
41             pod_coverage_ok(
42             $module,
43             {
44             coverage_class => 'Pod::Coverage::TrustPod',
45             also_private => \@also_private,
46             trustme => $trustme{$module} || [],
47             },
48             "pod coverage for $module"
49             );
50             }
51              
52             done_testing();