FU: Fix error logging of formdata
This commit is contained in:
parent
6c54ee3091
commit
8dbc17ab37
1 changed files with 1 additions and 1 deletions
2
FU.pm
2
FU.pm
|
|
@ -663,7 +663,7 @@ sub log_verbose($,$msg) {
|
|||
'Headers:', (map " $_: $r->{hdr}{$_}", sort keys $r->{hdr}->%*),
|
||||
$r->{multipart} ? ('Body (multipart):', _fmt_section join "\n", map $_->describe, $r->{multipart}->@*) :
|
||||
$r->{json} ? ('Body (JSON):', _fmt_section FU::Util::json_format($r->{json}, pretty => 1, canonical => 1)) :
|
||||
$r->{formdata} ? ('Body (formdata):', _fmt_section FU::Util::json_format($r->{json}, pretty => 1, canonical => 1)) :
|
||||
$r->{formdata} ? ('Body (formdata):', _fmt_section FU::Util::json_format($r->{formdata}, pretty => 1, canonical => 1)) :
|
||||
length $r->{body} ? do {
|
||||
my $b = substr $r->{body}, 0, 4096;
|
||||
my $trunc = length $r->{body} > 4096 ? ', truncated' : '';
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue