[dbsrgits/DBIx-Class.git] / t / 02pod.t

use warnings;
use strict;

use Test::More;
use lib qw(t/lib);
use DBICTest;

my @MODULES = (
  'Test::Pod 1.26',
);

# Don't run tests for installs
unless ( DBICTest::AuthorCheck->is_author || $ENV{AUTOMATED_TESTING} || $ENV{RELEASE_TESTING} ) {
  plan( skip_all => "Author tests not required for installation" );
}

# Load the testing modules
foreach my $MODULE ( @MODULES ) {
  eval "use $MODULE";
  if ( $@ ) {
    $ENV{RELEASE_TESTING}
    ? die( "Failed to load required release-testing module $MODULE" )
    : plan( skip_all => "$MODULE not available for testing" );
  }
}

all_pod_files_ok();
Commit	Line	Data
dc4600b2	1	use warnings;
	2	use strict;
	3
0fe5201a	4	use Test::More;
dc4600b2	5	use lib qw(t/lib);
	6	use DBICTest;
	7
	8	my @MODULES = (
	9	'Test::Pod 1.26',
	10	);
	11
	12	# Don't run tests for installs
	13	unless ( DBICTest::AuthorCheck->is_author \|\| $ENV{AUTOMATED_TESTING} \|\| $ENV{RELEASE_TESTING} ) {
	14	plan( skip_all => "Author tests not required for installation" );
	15	}
0fe5201a	16
dc4600b2	17	# Load the testing modules
	18	foreach my $MODULE ( @MODULES ) {
	19	eval "use $MODULE";
	20	if ( $@ ) {
	21	$ENV{RELEASE_TESTING}
	22	? die( "Failed to load required release-testing module $MODULE" )
	23	: plan( skip_all => "$MODULE not available for testing" );
	24	}
	25	}
0fe5201a	26
0fe5201a	27	all_pod_files_ok();