X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02pod.t;h=1c55c964da63011be40c23f9f6b1bd67d6ea08e4;hb=cf85635700695fcf07a2383270c9c3d0ac1baa73;hp=1647794510bbde7dd741a90c23c802cb3fc4fc3a;hpb=0fe5201a6da4c844685b79547babd594f669ff3d;p=dbsrgits%2FDBIx-Class.git diff --git a/t/02pod.t b/t/02pod.t index 1647794..1c55c96 100644 --- a/t/02pod.t +++ b/t/02pod.t @@ -1,7 +1,21 @@ +use warnings; +use strict; + use Test::More; +use lib qw(t/lib); +use DBICTest; + +# 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" ); +} -eval "use Test::Pod 1.14"; -plan skip_all => 'Test::Pod 1.14 required' if $@; -plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD}; +require DBIx::Class; +unless ( DBIx::Class::Optional::Dependencies->req_ok_for ('test_pod') ) { + my $missing = DBIx::Class::Optional::Dependencies->req_missing_for ('test_pod'); + $ENV{RELEASE_TESTING} || DBICTest::AuthorCheck->is_author + ? die ("Failed to load release-testing module requirements: $missing") + : plan skip_all => "Test needs: $missing" +} -all_pod_files_ok(); +Test::Pod::all_pod_files_ok();