FU: Improve merging of "Vary" response headers + debug header listing
This commit is contained in:
parent
f2294a709a
commit
1594006739
2 changed files with 10 additions and 8 deletions
|
|
@ -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')
|
||||
},
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue