Mercurial > hg > nginx-tests
comparison h2.t @ 717:3b6ff3b7367d
Tests: fixed multiple header field values representation in h2.t.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Mon, 28 Sep 2015 16:41:02 +0300 |
parents | e3fd2c8d257e |
children | ba822b2e899c |
comparison
equal
deleted
inserted
replaced
716:e3fd2c8d257e | 717:3b6ff3b7367d |
---|---|
2595 } | 2595 } |
2596 | 2596 |
2597 sub add { | 2597 sub add { |
2598 my ($h, $n, $v) = @_; | 2598 my ($h, $n, $v) = @_; |
2599 return $h->{$n} = $v unless exists $h->{$n}; | 2599 return $h->{$n} = $v unless exists $h->{$n}; |
2600 $h->{$n} = [ $h->{$n} ]; | 2600 $h->{$n} = [ $h->{$n} ] unless ref $h->{$n}; |
2601 push @{$h->{$n}}, $v; | 2601 push @{$h->{$n}}, $v; |
2602 } | 2602 } |
2603 | 2603 |
2604 while ($skip < $length) { | 2604 while ($skip < $length) { |
2605 my $ib = unpack("\@$skip B8", $data); | 2605 my $ib = unpack("\@$skip B8", $data); |