X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FNode.pm;h=7363f5e885e1330f0eb78136644cd6adebe78ea0;hp=a790ba8d2543af7f0f67e623f1e061224e16dc33;hb=052976d4a389b826a9551909492f3fc2f2312c88;hpb=8faf2a289aa3409e7cafe2536f943fb43033b086 diff --git a/lib/Object/Remote/Node.pm b/lib/Object/Remote/Node.pm index a790ba8..7363f5e 100644 --- a/lib/Object/Remote/Node.pm +++ b/lib/Object/Remote/Node.pm @@ -18,7 +18,7 @@ sub run { my $loop = Object::Remote->current_loop; $c->on_close->on_ready(sub { - log_info { "Node connection with call handler has closed" }; + log_debug { "Node connection with call handler has closed" }; $loop->want_stop }); @@ -26,6 +26,10 @@ sub run { print { $c->send_to_fh } "Shere\n"; log_debug { "Node is going to start the run loop" }; + #TODO the alarm should be reset after the run loop starts + #at a minimum - the remote side node should probably send + #a command that clears the alarm in all instances - even + #if the Object::Remote::Watchdog is not being used if ($args{watchdog_timeout}) { Object::Remote::WatchDog->new(timeout => $args{watchdog_timeout}); } else {