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

[turnstep]

Author: turnstep
Date: Thu Sep  3 20:07:33 2009
New Revision: 13271

Modified:
   DBD-Pg/trunk/t/00_release.t
   DBD-Pg/trunk/t/99_perlcritic.t
   DBD-Pg/trunk/t/99_pod.t
   DBD-Pg/trunk/t/99_spellcheck.t
   DBD-Pg/trunk/t/99_yaml.t

Log:
Switch to standard RELEASE_TESTING env


Modified: DBD-Pg/trunk/t/00_release.t
==============================================================================
--- DBD-Pg/trunk/t/00_release.t (original)
+++ DBD-Pg/trunk/t/00_release.t Thu Sep  3 20:07:33 2009
@@ -9,8 +9,8 @@
 use Test::More;
 use lib 't','.';
 
-if (!$ENV{TEST_AUTHOR}) {
-       plan skip_all => 'Set the environment variable TEST_AUTHOR to enable 
this test';
+if (! $ENV{RELEASE_TESTING}) {
+       plan (skip_all =>  'Test skipped unless environment variable 
RELEASE_TESTING is set');
 }
 plan tests => 1;
 

Modified: DBD-Pg/trunk/t/99_perlcritic.t
==============================================================================
--- DBD-Pg/trunk/t/99_perlcritic.t      (original)
+++ DBD-Pg/trunk/t/99_perlcritic.t      Thu Sep  3 20:07:33 2009
@@ -2,7 +2,6 @@
 
 ## Run Perl::Critic against the source code and the tests
 ## This is highly customized, so take with a grain of salt
-## Requires TEST_CRITIC to be set
 
 use 5.006;
 use strict;
@@ -13,8 +12,8 @@
 
 my (@testfiles,%fileslurp,$t);
 
-if (!$ENV{TEST_CRITIC}) {
-       plan skip_all => 'Set the environment variable TEST_CRITIC to enable 
this test';
+if (! $ENV{RELEASE_TESTING}) {
+       plan (skip_all =>  'Test skipped unless environment variable 
RELEASE_TESTING is set');
 }
 elsif (!eval { require Perl::Critic; 1 }) {
        plan skip_all => 'Could not find Perl::Critic';

Modified: DBD-Pg/trunk/t/99_pod.t
==============================================================================
--- DBD-Pg/trunk/t/99_pod.t     (original)
+++ DBD-Pg/trunk/t/99_pod.t     Thu Sep  3 20:07:33 2009
@@ -2,7 +2,6 @@
 
 ## Check our Pod, requires Test::Pod
 ## Also done if available: Test::Pod::Coverage
-## Requires TEST_AUTHOR env
 
 use 5.006;
 use strict;
@@ -10,8 +9,8 @@
 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';
+if (! $ENV{RELEASE_TESTING}) {
+       plan (skip_all =>  'Test skipped unless environment variable 
RELEASE_TESTING is set');
 }
 
 plan tests => 3;

Modified: DBD-Pg/trunk/t/99_spellcheck.t
==============================================================================
--- DBD-Pg/trunk/t/99_spellcheck.t      (original)
+++ DBD-Pg/trunk/t/99_spellcheck.t      Thu Sep  3 20:07:33 2009
@@ -1,7 +1,6 @@
 #!perl
 
 ## Spellcheck as much as we can
-## Requires TEST_SPELL to be set
 
 use 5.006;
 use strict;
@@ -11,8 +10,8 @@
 
 my (@testfiles, $fh);
 
-if (!$ENV{TEST_SPELL}) {
-       plan skip_all => 'Set the environment variable TEST_SPELL to enable 
this test';
+if (! $ENV{RELEASE_TESTING}) {
+       plan (skip_all =>  'Test skipped unless environment variable 
RELEASE_TESTING is set');
 }
 elsif (!eval { require Text::SpellChecker; 1 }) {
        plan skip_all => 'Could not find Text::SpellChecker';

Modified: DBD-Pg/trunk/t/99_yaml.t
==============================================================================
--- DBD-Pg/trunk/t/99_yaml.t    (original)
+++ DBD-Pg/trunk/t/99_yaml.t    Thu Sep  3 20:07:33 2009
@@ -8,6 +8,10 @@
 use Test::More;
 select(($|=1,select(STDERR),$|=1)[1]);
 
+if (! $ENV{RELEASE_TESTING}) {
+       plan (skip_all =>  'Test skipped unless environment variable 
RELEASE_TESTING is set');
+}
+
 plan tests => 2;
 
 my $V = 0.03;