xt/author/pod-coverage.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

#!perl 
use strict;
use warnings;
use Test::More;
 
use Test::Pod::Coverage 1.08;
use Pod::Coverage::TrustPod;
 
# don't test files generated by Inline::Module 
my @modules = grep { not m{::Inline$} } all_modules();
 
pod_coverage_ok(
    $_,
    { coverage_class => 'Pod::Coverage::TrustPod' },
) for @modules;
 
done_testing;