perl: Small fix to 006-pod-coverage test.

Some code copied over from libguestfs, fixed.

diff --git a/perl/t/006-pod-coverage.t b/perl/t/006-pod-coverage.t
index 00c13c6..bcfb6d8 100644 (file)
--- a/perl/t/006-pod-coverage.t
+++ b/perl/t/006-pod-coverage.t
@@ -21,4 +21,4 @@ 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 ();