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=cd295a4072763ba5bd4a28919b7bbb04d55c16f2;hpb=a27266b77a5c66f0c059c865193f64871d0dd90c 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 {