t/92-pod-coverage.t

   1 #!perl -T
   2
   3 use strict;
   4 use warnings;
   5
   6 use Test::More;
   7
   8 use lib 't/lib';
   9 use VPIT::TestHelpers;
  10
  11 load_or_skip_all('Test::Pod::Coverage', '1.08', [ ]);
  12 load_or_skip_all('Pod::Coverage',       '0.18'     );
  13
  14 eval 'use Test::Pod::Coverage'; # Make Kwalitee test happy
  15
  16 my $trustparents = { coverage_class => 'Pod::Coverage::CountParents' };
  17
  18 plan tests => 21;
  19
  20 pod_coverage_ok('Test::Valgrind');
  21
  22 pod_coverage_ok('Test::Valgrind::Action');
  23 pod_coverage_ok('Test::Valgrind::Action::Captor');
  24 pod_coverage_ok('Test::Valgrind::Action::Suppressions', $trustparents);
  25 pod_coverage_ok('Test::Valgrind::Action::Test', $trustparents);
  26
  27 pod_coverage_ok('Test::Valgrind::Carp');
  28
  29 pod_coverage_ok('Test::Valgrind::Command');
  30 pod_coverage_ok('Test::Valgrind::Command::Aggregate', $trustparents);
  31 pod_coverage_ok('Test::Valgrind::Command::Perl', $trustparents);
  32 pod_coverage_ok('Test::Valgrind::Command::PerlScript', $trustparents);
  33
  34 pod_coverage_ok('Test::Valgrind::Component');
  35
  36 pod_coverage_ok('Test::Valgrind::Parser');
  37 pod_coverage_ok('Test::Valgrind::Parser::Suppressions::Text', $trustparents);
  38 pod_coverage_ok('Test::Valgrind::Parser::Text', $trustparents);
  39 pod_coverage_ok('Test::Valgrind::Parser::XML', $trustparents);
  40 pod_coverage_ok('Test::Valgrind::Parser::XML::Twig', {
  41  %$trustparents,
  42  also_private => [ qr/^handle_/, qw<stash> ],
  43 });
  44
  45 pod_coverage_ok('Test::Valgrind::Report');
  46 pod_coverage_ok('Test::Valgrind::Session');
  47 pod_coverage_ok('Test::Valgrind::Suppressions');
  48
  49 pod_coverage_ok('Test::Valgrind::Tool');
  50 pod_coverage_ok('Test::Valgrind::Tool::memcheck', $trustparents);