1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
#!/usr/bin/perl
use strict;
use warnings;
use Test::More;
use Test::Lintian;
plan skip_all => 'Not needed for coverage of Lintian'
if $ENV{'LINTIAN_COVERAGE'};
plan skip_all => 'Test::Pod::Coverage 1.08 required for this test'
unless eval 'use Test::Pod::Coverage 1.08; 1';
load_profile_for_test;
# exempt checks and screens
my @modules = grep { !/^Lintian::(?:Check|Screen)::/ } all_modules('lib');
plan tests => scalar @modules;
pod_coverage_ok($_, { coverage_class => 'Pod::Coverage::TrustPod' })
for @modules;
# Local Variables:
# indent-tabs-mode: nil
# cperl-indent-level: 4
# End:
# vim: syntax=perl sw=4 sts=4 sr et
|
