on master help sign in
Accept "h2" as HTTP/2 in ALPN negotiations
394e1d3Andrew Pritchard
warp/Network/Wai/Handler/Warp/HTTP2/Types.hs+1−1
@@ -37,7 +37,7 @@ isHTTP2 tls = useHTTP2
37 where
37 where
38 useHTTP2 = case tlsNegotiatedProtocol tls of
38 useHTTP2 = case tlsNegotiatedProtocol tls of
39 Nothing -> False
39 Nothing -> False
40− Just proto -> "h2-" `BS.isPrefixOf` proto
40+ Just proto -> "h2-" `BS.isPrefixOf` proto || proto == "h2"
41
41
42----------------------------------------------------------------
42----------------------------------------------------------------
43
43