ext/Digest/SHA/t/0-pod-coverage.t

   1 BEGIN {
   2         if ($ENV{PERL_CORE}) {
   3                 chdir 't' if -d 't';
   4                 @INC = '../lib';
   5         }
   6 }
   7
   8 BEGIN {
   9         eval "use Test::More";
  10         if ($@) {
  11                 print "1..0 # Skipped: Test::More not installed\n";
  12                 exit;
  13         }
  14 }
  15
  16 eval "use Test::Pod::Coverage 0.08";
  17 plan skip_all => "Test::Pod::Coverage 0.08 required for testing POD coverage" if $@;
  18
  19 my @privfcns = qw(
  20         Addfile
  21         Hexdigest
  22         B64digest
  23         shaclose
  24         shadump
  25         shadup
  26         shaload
  27         shaopen
  28         sharewind
  29         shawrite
  30 );
  31
  32 all_pod_coverage_ok( { also_private => \@privfcns } );