}
sub _build_max_level {
- my ($self) = @_;
- return $self->level_names->[-1];
+ my ($self) = @_;
+ return $self->level_names->[-1];
}
sub _build__level_active {
$method = '(none)' unless defined $method;
return {
- '%' => '%', t => $self->_render_time($metadata->{timestamp}),
+ '%' => '%', 'n' => "\n",
+ t => $self->_render_time($metadata->{timestamp}),
r => $self->_render_remote($metadata->{object_remote}),
s => $self->_render_log(@$content), l => $level,
c => $metadata->{controller}, p => $metadata->{package}, m => $method,
sub _render_remote {
my ($self, $remote) = @_;
- return 'local' if ! defined $remote || ! defined $remote->{connection_id};
- return 'remote #' . $remote->{connection_id};
+ return 'local' unless defined $remote;
+ my $conn_id = $remote->{connection_id};
+ $conn_id = '(uninit)' unless defined $conn_id;
+ return "remote #$conn_id";
}
sub _render_log {
A literal %.
+=item %n
+
+A newline.
+
=back
=back