perl: Ignore debug functions in Test::Pod::Coverage.
authorRichard W.M. Jones <rjones@redhat.com>
Thu, 11 Nov 2010 22:25:15 +0000 (22:25 +0000)
committerRichard W.M. Jones <rjones@redhat.com>
Thu, 11 Nov 2010 22:25:20 +0000 (22:25 +0000)
perl/t/006-pod-coverage.t

index c648b34..61e7b96 100644 (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.*/ ]
+});