X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fauthor%2Fpodcoverage.t;h=f8868b63a4f3c545ae5720c710531acfb965ba9c;hb=6904879203b100d3cf3e8f5bf78e2d164476e654;hp=e8730de68944b5e641c444760897d8dc495ec140;hpb=91b4b59593fcf7b74562c89b5479b2305d78b94c;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/author/podcoverage.t b/t/author/podcoverage.t
index e8730de..f8868b6 100644
--- a/t/author/podcoverage.t
+++ b/t/author/podcoverage.t
@@ -5,9 +5,12 @@ use Test::More;
 use Pod::Coverage 0.19;
 use Test::Pod::Coverage 1.04;
 
-all_pod_coverage_ok(
-  {
-    also_private => ['BUILD']
-  }
-);
+my @modules = all_modules;
+our @private = ( 'BUILD' );
+foreach my $module (@modules) {
+    local @private = (@private, 'run') if $module =~ /^Catalyst::Script::/;
+    pod_coverage_ok($module, { also_private => \@private });
+}
+
+done_testing;