perl: Ignore debug functions in Test::Pod::Coverage.

This commit is contained in:
Richard W.M. Jones
2010-11-11 22:25:15 +00:00
parent f614a6dde9
commit 3431f397d3

View File

@@ -21,4 +21,7 @@ use warnings;
eval "use Test::Pod::Coverage 1.00";
plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD" if $@;
all_pod_coverage_ok ({also_private => [ qr/^test0.*/ ]});
all_pod_coverage_ok ({
also_private => [ qr/^test0.*/,
qr/^debug.*/ ]
});