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=0183c78473e6055d98b43574c1150a54bee9182a;hb=55c0d0209fa9d9265ff178f54ae9fe5fdddef3c1;hpb=5ccce2d5c1fb651f83c73c811069003e4a591a53 diff --git a/t/watchdog_fatnode.t b/t/watchdog_fatnode.t index 0183c78..edc73ab 100644 --- a/t/watchdog_fatnode.t +++ b/t/watchdog_fatnode.t @@ -3,7 +3,7 @@ use Test::More; $ENV{OBJECT_REMOTE_TEST_LOGGER} = 1; -use Object::Remote::Connector::Local; +use Object::Remote::Connector::Local; $SIG{ALRM} = sub { die "alarm signal\n" }; @@ -15,13 +15,13 @@ my $fatnode_text = Object::Remote::Connector::Local->new(timeout => 1)->fatnode_ #if it's not handled right eval { no warnings 'once'; - $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); } @@ -29,5 +29,5 @@ eval { is($@, "alarm signal\n", "Alarm handler was invoked"); -done_testing; +done_testing;