X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Feol.t;h=e61ce414d5836e4a7ba86fb17914919707ded69b;hb=39c9c72df61c84b595715e3d164bacc0b8e68439;hp=609f6adfc40325155edc1c671cc4cc5eb13d65a9;hpb=f90896ae18712675ac223834265342fbc5558b07;p=dbsrgits%2FDBIx-Class.git

diff --git a/xt/eol.t b/xt/eol.t
index 609f6ad..e61ce41 100644
--- a/xt/eol.t
+++ b/xt/eol.t
@@ -6,7 +6,7 @@ use lib 't/lib';
 use DBICTest;
 
 # Don't run tests for installs
-unless ( DBICTest::AuthorCheck->is_author || $ENV{AUTOMATED_TESTING} || $ENV{RELEASE_TESTING} ) {
+if ( DBICTest::RunMode->is_plain ) {
   plan( skip_all => "Author tests not required for installation" );
 }
 
@@ -15,7 +15,7 @@ plan skip_all => 'Test::EOL very broken';
 require DBIx::Class;
 unless ( DBIx::Class::Optional::Dependencies->req_ok_for ('test_eol') ) {
   my $missing = DBIx::Class::Optional::Dependencies->req_missing_for ('test_eol');
-  $ENV{RELEASE_TESTING} || DBICTest::AuthorCheck->is_author
+  (! DBICTest::RunMode->is_plain && ! DBICTest::RunMode->is_smoker )
     ? die ("Failed to load release-testing module requirements: $missing")
     : plan skip_all => "Test needs: $missing"
 }
@@ -24,7 +24,7 @@ TODO: {
   local $TODO = 'Do not fix those yet - we have way too many branches out there, merging will be hell';
   Test::EOL::all_perl_files_ok({ trailing_whitespace => 1},
     qw/t xt lib script/,
-    DBICTest::AuthorCheck->is_author ? ('maint') : (),
+    DBICTest::RunMode->is_author ? ('maint') : (),
   );
 }