X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FLogging%2FLogger.pm;h=e9f1350d7623e755799242d510f46c90b4a65f9d;hp=fb05fb88e7bd72c1c1b1d0ca5696948932ac7e32;hb=515662654de237f5d17c6d3c7169b6a3b08c18d9;hpb=f1d7083568d3d8322a66f9c1265ef326999c5a23 diff --git a/lib/Object/Remote/Logging/Logger.pm b/lib/Object/Remote/Logging/Logger.pm index fb05fb8..e9f1350 100644 --- a/lib/Object/Remote/Logging/Logger.pm +++ b/lib/Object/Remote/Logging/Logger.pm @@ -48,8 +48,8 @@ sub AUTOLOAD { } sub _build_max_level { - my ($self) = @_; - return $self->level_names->[-1]; + my ($self) = @_; + return $self->level_names->[-1]; } sub _build__level_active { @@ -175,7 +175,7 @@ Object::Remote::Logging::Logger - Format and output a log message #router will hold this logger forever #and send it all log messages - router->connect(Object::Remote::Logging::WarnLogger->new( + router->connect(Object::Remote::Logging::Logger->new( level_names => arg_levels, format => '%s at %f line %i, log level: %l' min_level => 'warn', max_level => 'error', )); @@ -339,6 +339,10 @@ Process id of the Perl interpreter that generated the log message. A literal %. +=item %n + +A newline. + =back =back