X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=t%2Fwatchdog_fatnode.t;h=edc73ab1c116f1037fd5a75dde6e1e45e3c84981;hp=ee954f07e51b3137ae44e3bf019e28d3bf9c36a5;hb=HEAD;hpb=8faf2a289aa3409e7cafe2536f943fb43033b086 diff --git a/t/watchdog_fatnode.t b/t/watchdog_fatnode.t index ee954f0..edc73ab 100644 --- a/t/watchdog_fatnode.t +++ b/t/watchdog_fatnode.t @@ -1,14 +1,12 @@ use strictures 1; use Test::More; -require 't/logsetup.pl'; +$ENV{OBJECT_REMOTE_TEST_LOGGER} = 1; -use Object::Remote::Connector::Local; +use Object::Remote::Connector::Local; $SIG{ALRM} = sub { die "alarm signal\n" }; -open(my $nullfh, '>', '/dev/null') or die "Could not open /dev/null: $!"; - my $fatnode_text = Object::Remote::Connector::Local->new(timeout => 1)->fatnode_text; #this simulates a node that has hung before it reaches @@ -17,14 +15,13 @@ my $fatnode_text = Object::Remote::Connector::Local->new(timeout => 1)->fatnode_ #if it's not handled right eval { no warnings 'once'; - local *STDOUT = $nullfh; - $Object::Remote::FatNode::INHIBIT_RUN_NODE = 1; + $Object::Remote::FatNode::INHIBIT_RUN_NODE = 1; eval $fatnode_text; - + if ($@) { die "could not eval fatnode text: $@"; - } - + } + while(1) { sleep(1); } @@ -32,5 +29,5 @@ eval { is($@, "alarm signal\n", "Alarm handler was invoked"); -done_testing; +done_testing;