initial commit
This commit is contained in:
23
api/perl/t/98-Pod-Coverage.t
Normal file
23
api/perl/t/98-Pod-Coverage.t
Normal file
@@ -0,0 +1,23 @@
|
||||
#!/usr/bin/env perl
|
||||
#
|
||||
# $Id$
|
||||
#
|
||||
use strict;
|
||||
use warnings;
|
||||
use File::Spec;
|
||||
use Test::More;
|
||||
|
||||
if ( not $ENV{TEST_AUTHOR} ) {
|
||||
my $msg = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
|
||||
plan( skip_all => $msg );
|
||||
}
|
||||
|
||||
eval { require Test::Pod::Coverage; };
|
||||
|
||||
if ( $@ ) {
|
||||
my $msg = 'Test::Pod::Coverage required to criticise pod';
|
||||
plan( skip_all => $msg );
|
||||
}
|
||||
|
||||
eval "use Test::Pod::Coverage 1.00";
|
||||
all_pod_coverage_ok();
|
||||
Reference in New Issue
Block a user