Logger: Check msg
and label
for definedness
This commit is contained in:
parent
15db76f739
commit
0f094ac121
1 changed files with 3 additions and 7 deletions
10
ddclient.in
10
ddclient.in
|
@ -2374,16 +2374,12 @@ sub ynu {
|
|||
# provided (it is ignored if the `msg` keyword is present).
|
||||
sub log {
|
||||
my $self = shift;
|
||||
my %args = (
|
||||
msg => '',
|
||||
label => '',
|
||||
(@_ % 2) ? (msg => pop) : (),
|
||||
@_,
|
||||
);
|
||||
my %args = (@_ % 2 ? (msg => pop) : (), @_);
|
||||
$args{ctx} = [$args{ctx} // ()] if ref($args{ctx}) eq '';
|
||||
my $buffer = $args{msg};
|
||||
my $buffer = $args{msg} // '';
|
||||
chomp($buffer);
|
||||
if (!$args{raw}) {
|
||||
$args{label} //= '';
|
||||
my $prefix = $args{label} ? sprintf("%-8s ", $args{label} . ':') : '';
|
||||
$prefix .= "[$_]" for $self->_ctxs(), @{$args{ctx}};
|
||||
$prefix .= '> ' if $prefix;
|
||||
|
|
Loading…
Reference in a new issue