xapian-bindings/perl/t/02pod.t

   1 use strict;
   2 # Make warnings fatal
   3 use warnings;
   4 BEGIN {$SIG{__WARN__} = sub { die "Terminating test due to warning: $_[0]" } };
   5
   6 use Test::More;
   7
   8 eval "use Test::Pod 1.14";
   9 plan skip_all => 'Test::Pod 1.14 required' if $@;
  10 plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
  11
  12 all_pod_files_ok( all_pod_files( '.' ) );