Fix failures with DBICTEST_SQLITE_USE_FILE=1 introduced by 50261284

[dbsrgits/DBIx-Class.git] / t / 53lean_startup.t

diff --git a/t/53lean_startup.t b/t/53lean_startup.t
index 072eac3..8af340a 100644 (file)
--- a/t/53lean_startup.t
+++ b/t/53lean_startup.t
@@ -41,6 +41,7 @@ BEGIN {
 
     namespace::clean
     Try::Tiny
+    Context::Preserve
     Sub::Name
 
     Scalar::Util
@@ -55,6 +56,8 @@ BEGIN {
 
     Class::Accessor::Grouped
     Class::C3::Componentised
+    Moo
+    Sub::Quote
   /, $] < 5.010 ? ( 'Class::C3', 'MRO::Compat' ) : () }; # this is special-cased in DBIx/Class.pm
 
   $test_hook = sub {
@@ -91,7 +94,7 @@ BEGIN {
     ) {
       fail ("Unexpected require of '$req' by $caller[0] ($caller[1] line $caller[2])");
 
-      if ($ENV{TEST_VERBOSE}) { 
+      if ($ENV{TEST_VERBOSE}) {
         my ($i, @stack) = 1;
         while (my @f = caller($i++) ) {
           push @stack, \@f;