1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
#!perl -T
use Test::More;
plan skip_all => "These tests are for release candidate testing"
if !$ENV{RELEASE_TESTING};
eval "use Test::Pod::Coverage 1.04";
plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
my $params = {
trustme => [qr/^ERROR$/]
};
require Config;
my @modules = grep { $Config::Config{useithreads} || $_ ne 'HTTP::Proxy::Engine::Threaded' } all_modules();
plan tests => scalar @modules;
pod_coverage_ok($_, $params) for @modules;
|
