Mercurial > hg > nginx-tests

changeset 1181:eb813f7e0bfa

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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);
 }