4

谁能给我提供一个带有servant-server、wai、warp等的cookie的最小示例？

例如，具有单个字段“语言”且值为“en”的 cookie

有没有像 happstack-liteaddCookies和的简单方法lookCookieValue？

4

1 回答 1

5

要编写 cookie：

Get '[JSON] (Headers '[Header "Set-Cookie" SetCookie] ...)

SetCookie最近有ToHttpApiData实例http-api-data，所以这很有效。

并且要读取我自己制作的 cookie newtype，因为Cookies它是类型别名，cookie所以我们不能直接为它编写实例。

newtype Cookies' = Cookies' Cookies -- type Cookies = [(BS.ByteString, BS.ByteString)]

instance FromHttpApiData Cookies' where
  parseHeader = return . Cookies' . parseCookies
  parseQueryParam = return . Cookies' . parseCookies . TE.encodeUtf8
于 2019-02-26T17:20:53.497 回答