X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=perl%2Ft%2F006-pod-coverage.t;fp=perl%2Ft%2F006-pod-coverage.t;h=61e7b96f7c1c3c75fee57156c84fb82931e6417f;hp=c648b3440e19c9de06ce6c65934407c3d99ad28e;hb=3431f397d34740fcd3a2d6f94d03af6e5f8f1a36;hpb=f614a6dde922a9bd7351138ed6ebd524634bbd16

diff --git a/perl/t/006-pod-coverage.t b/perl/t/006-pod-coverage.t
index c648b34..61e7b96 100644
--- a/perl/t/006-pod-coverage.t
+++ b/perl/t/006-pod-coverage.t
@@ -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.*/ ]
+});