X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=perl%2Ft%2F006-pod-coverage.t;h=65bb4c2ca881a5703fe540d32169e6cd5e7c63d5;hb=7708d3e04f6ec3985fd74ee1a44a5615d43065e2;hp=c648b3440e19c9de06ce6c65934407c3d99ad28e;hpb=c41fe04a652437c920acb0e820762c53bf44a139;p=libguestfs.git

diff --git a/perl/t/006-pod-coverage.t b/perl/t/006-pod-coverage.t
index c648b34..65bb4c2 100644
--- a/perl/t/006-pod-coverage.t
+++ b/perl/t/006-pod-coverage.t
@@ -13,7 +13,7 @@
 #
 # You should have received a copy of the GNU General Public License
 # along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
 use Test::More;
 use strict;
@@ -21,4 +21,8 @@ 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.*/,
+                      qr/^internal.*/ ]
+});