# HG changeset patch # User Sergey Kandaurov # Date 1634813775 -10800 # Node ID 3408029c09f59ca52841dab50ec8b2b773a041d9 # Parent f7e667a4898d5cf6e3d45ef6cd2c499c36f723aa Tests: added HTTP/2 test with rejected ALPN. diff --git a/h2_ssl.t b/h2_ssl.t --- a/h2_ssl.t +++ b/h2_ssl.t @@ -89,10 +89,17 @@ open OLDERR, ">&", \*STDERR; close STDER open STDERR, ">&", \*OLDERR; plan(skip_all => 'no ALPN negotiation') unless defined getconn(); -$t->plan(2); +$t->plan(3); ############################################################################### +TODO: { +local $TODO = 'not yet' unless $t->has_version('1.21.4'); + +ok(!get_ssl_socket(['unknown']), 'alpn rejected'); + +} + like(http_get('/', socket => get_ssl_socket(['http/1.1'])), qr/200 OK/, 'alpn to HTTP/1.1 fallback');