#!/usr/bin/perl -T
# t/97pod.t
# Checks that POD commands are correct
#
# $Id: 97pod.t 8620 2009-08-18 04:36:27Z FREQUENCY@cpan.org $
use strict;
unless ($ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING}) {
plan skip_all => 'Author tests not required for installation';
}
my %MODULES = (
'Test::Pod' => 1.26,
'Pod::Simple' => 3.07,
);
# Module::CPANTS::Kwalitee won't detect that we're using test modules as
# author tests, so we convince it that we're loading it in the normal way.
0 and require Test::Pod;
while (my ($module, $version) = each %MODULES) {
eval "use $module $version";
next unless $@;
if ($ENV{RELEASE_TESTING}) {
die 'Could not load release-testing module ' . $module;
}
else {
plan skip_all => $module . ' not available for testing';
}
}
all_pod_files_ok();