X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=t%2Fstart_core.t;h=cb2ed875a91d18366b588262ce5e6d7f40b2c345;hp=964a103d1e69a3ba634276ed35ee1b69af6ee6e5;hb=710f1c32ba19676990ecda960c9eff96c4002328;hpb=f129bfaf05b1ae0e2e2992cad47a70482dec9885

diff --git a/t/start_core.t b/t/start_core.t
index 964a103..cb2ed87 100644
--- a/t/start_core.t
+++ b/t/start_core.t
@@ -3,7 +3,7 @@ use Test::More;
 use Object::Remote;
 use File::Spec;
 
-require 't/logsetup.pl';
+$ENV{OBJECT_REMOTE_TEST_LOGGER} = 1;
 
 {
   package S1S;
@@ -63,13 +63,17 @@ require 't/logsetup.pl';
 
 my $res;
 
-S1S->start::get_s2->then::get_s3->on_ready(sub { ($res) = $_[0]->get });
+my @keep;
+
+push @keep,
+  S1S->start::get_s2->then::get_s3->on_ready(sub { ($res) = $_[0]->get });
 
 is($res, 'S3', 'Synchronous code ok');
 
 undef($res);
 
-S1F->start::get_s2->then::get_s3->on_ready(sub { ($res) = $_[0]->get });
+push @keep,
+  S1F->start::get_s2->then::get_s3->on_ready(sub { ($res) = $_[0]->get });
 
 ok(!$S2F::C, 'Second future not yet constructed');