# HG changeset patch # User Sergey Kandaurov # Date 1443468916 -10800 # Node ID 4a1397cad0c0dba2129696b9f53b78ba90d418e2 # Parent 3c09ccf97d80d61cee7ea46fce07414573b5e6af Tests: removed HTTP/2 $server_protocol TODOs, fix committed. diff --git a/h2.t b/h2.t --- a/h2.t +++ b/h2.t @@ -687,9 +687,6 @@ is($frame->{data}, 'h2', 'http variable # $server_protocol -TODO: { -local $TODO = 'not yet'; - $sess = new_session(); $sid = new_stream($sess, { path => '/sp' }); $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]); @@ -697,17 +694,12 @@ local $TODO = 'not yet'; ($frame) = grep { $_->{type} eq "DATA" } @$frames; is($frame->{data}, 'HTTP/2.0', 'server_protocol variable'); -} - # $server_protocol - SSL/TLS connection, NPN SKIP: { eval { IO::Socket::SSL->can_npn() or die; }; skip 'OpenSSL NPN support required', 1 if $@; -TODO: { -local $TODO = 'not yet'; - $sess = new_session(8084, SSL => 1, npn => 'h2'); $sid = new_stream($sess, { path => '/sp' }); $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]); @@ -717,17 +709,12 @@ is($frame->{data}, 'HTTP/2.0', 'server_p } -} - # $server_protocol - SSL/TLS connection, ALPN SKIP: { eval { IO::Socket::SSL->can_alpn() or die; }; skip 'OpenSSL ALPN support required', 1 if $@; -TODO: { -local $TODO = 'not yet'; - $sess = new_session(8084, SSL => 1, alpn => 'h2'); $sid = new_stream($sess, { path => '/sp' }); $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]); @@ -737,8 +724,6 @@ is($frame->{data}, 'HTTP/2.0', 'server_p } -} - # $scheme $sess = new_session();