[svn:DBD-Pg] r11965 - DBD-Pg/trunk/t

[turn...@cvs.perl.org]

Author: turnstep
Date: Sun Oct 12 13:54:46 2008
New Revision: 11965

Modified:
DBD-Pg/trunk/t/99_pod.t

Log:
Only TEST_AUTHOR needs to run this test.

Modified: DBD-Pg/trunk/t/99_pod.t
==============================================================================
--- DBD-Pg/trunk/t/99_pod.t (original)
+++ DBD-Pg/trunk/t/99_pod.t Sun Oct 12 13:54:46 2008
@@ -2,6 +2,7 @@

## Check our Pod, requires Test::Pod
## Also done if available: Test::Pod::Coverage
+## Requires TEST_AUTHOR env

use 5.006;
use strict;
@@ -9,6 +10,10 @@
use Test::More;
select(($|=1,select(STDERR),$|=1)[1]);

+if (!$ENV{TEST_AUTHOR}) {
+ plan skip_all => 'Set the environment variable TEST_AUTHOR to enable this test';
+}
+
plan tests => 3;

my $PODVERSION = '0.95';