1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
|
#!perl
############ STANDARD Pod::Coverage TEST - DO NOT EDIT ##################
use Test::More;
use strict;
eval "use Test::Pod::Coverage 1.04";
plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage"
if $@;
all_pod_coverage_ok({
coverage_class => 'Pod::Coverage::CountParents',
also_private => [
qr/\A has_ /x,
"is_dodgy_utf8", # deprecated method, not documented but still working
"is_within_latin1", # deprecated method, not documented but still working
],
});
|