b1338c2 · typeable/wai

git.iko.soy/typeable/wai

on master help sign in

adding requestHeaderHost to Request. (#190)

b1338c2Kazu Yamamoto13 years ago

wai/Network/Wai.hs+1

@@ -186,4 +186,5 @@ defaultRequest = Request

186 , requestBody = return ()

187 , vault = mempty

188 , requestBodyLength = KnownLength 0

189+ , requestHeaderHost = Nothing

189 }

190 }

wai/Network/Wai/Internal.hs+2

@@ -58,6 +58,8 @@ data Request = Request

58 --

59 -- Since 1.4.0

60 , requestBodyLength :: RequestBodyLength

61+ -- | The value of the Host header in a HTTP request.

62+ , requestHeaderHost :: Maybe B.ByteString

61 }

63 }

62 deriving (Typeable)

64 deriving (Typeable)