X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FRegexp-Wildcards.git;a=blobdiff_plain;f=t%2F92-pod-coverage.t;fp=t%2F92-pod-coverage.t;h=f2a9f19d4ad43e9be678a0f089fc4e99fbf919c0;hp=0000000000000000000000000000000000000000;hb=b59989cf4ef20a00d992f8b249836e8105602f79;hpb=caa5f3c462570ffc1eb2c4222266978d1c925c3b

diff --git a/t/92-pod-coverage.t b/t/92-pod-coverage.t
new file mode 100644
index 0000000..f2a9f19
--- /dev/null
+++ b/t/92-pod-coverage.t
@@ -0,0 +1,21 @@
+#!perl -T
+
+use strict;
+use warnings;
+
+use Test::More;
+
+# Ensure a recent version of Test::Pod::Coverage
+my $min_tpc = 1.08;
+eval "use Test::Pod::Coverage $min_tpc";
+plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage" if $@;
+
+# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
+# but older versions don't recognize some common documentation styles
+my $min_pc = 0.18;
+eval "use Pod::Coverage $min_pc";
+plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage" if $@;
+
+all_pod_coverage_ok(
+ { also_private => [ qr/^do_/, qr/^capture_/, qw/extract/ ] }
+);