Logger: Localize override in test

This commit is contained in:
Richard Hansen 2024-08-02 04:39:31 -04:00
parent 37504fe6f2
commit dff4cd4854

View file

@ -113,7 +113,7 @@ for my $tc (@test_cases) {
$tc->{wantemail} //= ''; $tc->{wantemail} //= '';
my $output; my $output;
open(my $fh, '>', \$output); open(my $fh, '>', \$output);
$ddclient::emailbody = $tc->{init_email} // ''; local $ddclient::emailbody = $tc->{init_email} // '';
local $ddclient::_l = $ddclient::_l; local $ddclient::_l = $ddclient::_l;
$ddclient::_l = ddclient::pushlogctx($_) for @{$tc->{ctxs} // []}; $ddclient::_l = ddclient::pushlogctx($_) for @{$tc->{ctxs} // []};
ddclient::logmsg(fh => $fh, @{$tc->{args}}); ddclient::logmsg(fh => $fh, @{$tc->{args}});