X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02pod.t;h=729aa09b2c6aaa6c88078b208e79ad76907efba1;hb=620df7e8b1f5c9f335989baff37ddfe763032765;hp=1647794510bbde7dd741a90c23c802cb3fc4fc3a;hpb=0fe5201a6da4c844685b79547babd594f669ff3d;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/02pod.t b/t/02pod.t
index 1647794..729aa09 100644
--- a/t/02pod.t
+++ b/t/02pod.t
@@ -1,7 +1,27 @@
+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" );
+}
 
-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};
+# 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();