t/author/podcoverage.t

   1 use strict;
   2 use warnings;
   3 use Test::More;
   4
   5 use Pod::Coverage 0.19;
   6 use Test::Pod::Coverage 1.04;
   7
   8 my @modules = all_modules;
   9 our @private = ( 'BUILD' );
  10 foreach my $module (@modules) {
  11     local @private = (@private, 'run', 'dont_close_all_files') if $module =~ /^Catalyst::Script::/;
  12     local @private = (@private, 'plugin') if $module =~ /^Catalyst$/;
  13     local @private = (@private, 'snippets') if $module =~ /^Catalyst::Request$/;
  14     local @private = (@private, 'prepare_connection') if $module =~ /^Catalyst::Engine$/;
  15
  16     pod_coverage_ok($module, {
  17         also_private   => \@private,
  18         coverage_class => 'Pod::Coverage::TrustPod',
  19     });
  20 }
  21
  22 done_testing;
  23