Mercurial > hg > nginx-tests
changeset 1181:eb813f7e0bfa
Tests: adjusted HTTP2.pm to send SETTINGS params in a given order.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Tue, 06 Jun 2017 14:40:46 +0300 |
parents | a69de1aba1ad |
children | 83c88a830a45 |
files | lib/Test/Nginx/HTTP2.pm |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/Test/Nginx/HTTP2.pm +++ b/lib/Test/Nginx/HTTP2.pm @@ -116,11 +116,11 @@ sub h2_window { } sub h2_settings { - my ($self, $ack, %extra) = @_; + my ($self, $ack, @pairs) = @_; - my $len = 6 * keys %extra; + my $len = 6 * @pairs / 2; my $buf = pack_length($len) . pack "CCx4", 0x4, $ack ? 0x1 : 0x0; - $buf .= join '', map { pack "nN", $_, $extra{$_} } keys %extra; + $buf .= pack "nN", splice @pairs, 0, 2 while @pairs; raw_write($self->{socket}, $buf); }