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(); |