From: Peter Rabbitson <ribasushi@cpan.org>
Date: Tue, 29 Jul 2014 03:14:00 +0000 (+0200)
Subject: More diag from t/53lean_startup.t when under smoker env
X-Git-Tag: v0.082800~96
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ba7892a8c4;hp=2053211a210d15dbb7e354390b294955e9d591a2;p=dbsrgits%2FDBIx-Class.git

More diag from t/53lean_startup.t when under smoker env

Trying to pinpoint cause for the following two:
http://www.cpantesters.org/cpan/report/c13d6ffc-6bf4-1014-8850-81d5948d76d3
http://www.cpantesters.org/cpan/report/51d7cbe3-6bf5-1014-88de-68e8687ecb02
---

diff --git a/t/53lean_startup.t b/t/53lean_startup.t
index 0745b34..c5094a5 100644
--- a/t/53lean_startup.t
+++ b/t/53lean_startup.t
@@ -50,7 +50,7 @@ BEGIN {
       CORE::require('Test/More.pm');
       Test::More::fail ("Unexpected require of '$req' by $caller[0] ($caller[1] line $caller[2])");
 
-      if ($ENV{TEST_VERBOSE}) {
+      if ( $ENV{TEST_VERBOSE} or ! DBICTest::RunMode->is_plain ) {
         CORE::require('DBICTest/Util.pm');
         Test::More::diag( 'Require invoked' .  DBICTest::Util::stacktrace() );
       }