X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FLogging.pm;h=432b7976b49ef982802c21a86f69bdae7ac15961;hp=0622648ae102e2e07f0d894636d57d6f9635dcc0;hb=a63cd862186adf328e26dd1294e7a3b1adc42ed6;hpb=4a9fa1a5a329754549f998536e0e68f19d42d7ab diff --git a/lib/Object/Remote/Logging.pm b/lib/Object/Remote/Logging.pm index 0622648..432b797 100644 --- a/lib/Object/Remote/Logging.pm +++ b/lib/Object/Remote/Logging.pm @@ -40,18 +40,22 @@ sub init_logging_stderr { our $Log_Output = Object::Remote::LogDestination->new( logger => Log::Contextual::SimpleLogger->new({ levels_upto => $Log_Level, - coderef => sub { warn "[$hostname $$] ", @_ }, + coderef => sub { + my @t = localtime(); + my $time = sprintf("%0.2i:%0.2i:%0.2i", $t[2], $t[1], $t[0]); + warn "[$hostname $$] $time ", @_ + }, }) ); $Log_Output->connect($class->arg_router); } sub init_logging_forwarding { - my ($class, $remote_parent) = @_; - chomp(my $host = `hostname`); - $class->arg_router->description("$$ $host"); - $class->arg_router->parent_router($remote_parent); - $remote_parent->add_child_router($class->arg_router); +# my ($class, $remote_parent) = @_; +# chomp(my $host = `hostname`); +# $class->arg_router->description("$$ $host"); +# $class->arg_router->parent_router($remote_parent); +# $remote_parent->add_child_router($class->arg_router); } 1;