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 pod_coverage_ok(
  15  'Sub::Op',
  16  {
  17   also_private => [
  18    qr/^_/,
  19    qr/^CLONE(_SKIP)?$/,
  20    'dl_load_flags',
  21   ],
  22  },
  23  'Sub::Op is covered',
  24 );