git.iko.soy/typeable/wai
on master help sign in
fixing the hasBody logic. (h2spec -s 8.1)
b030a8cKazu Yamamoto
warp/Network/Wai/Handler/Warp/HTTP2/Worker.hs+1−1
compare with master
unifiedsplit
@@ -73,7 +73,7 @@ response Context{outputQ} mgr tconf th strm pri req rsp = do
73 _ -> do
73 _ -> do
74 setThreadContinue tconf True
74 setThreadContinue tconf True
75 let hasBody = requestMethod req /= H.methodHead
75 let hasBody = requestMethod req /= H.methodHead
76− || R.hasBody (responseStatus rsp)
76+ && R.hasBody (responseStatus rsp)
77 enqueue outputQ (OResponse strm rsp (Oneshot hasBody)) pri
77 enqueue outputQ (OResponse strm rsp (Oneshot hasBody)) pri
78 return ResponseReceived
78 return ResponseReceived
79
79