FU: Improve merging of "Vary" response headers + debug header listing

This commit is contained in:
Yorhel 2025-04-20 11:40:27 +02:00
parent f2294a709a
commit 1594006739
2 changed files with 10 additions and 8 deletions

View file

@ -75,10 +75,13 @@ my @tabs = (
};
h2_ 'Headers';
table_ sub {
tr_ sub {
td_ $_;
td_ $r->{reshdr}{$_};
} for sort keys $r->{reshdr}->%*;
for my $k (sort keys $r->{reshdr}->%*) {
my $v = $r->{reshdr}{$k};
tr_ sub {
td_ $k;
td_ $_;
} for !defined $v ? () : ref $v ? @$v : ($v);
}
};
('Response')
},