http-conduit-1.9.4中的requestHeaders

Question

我正在尝试创建带有自定义头部的http请求(使用http-conduit-1.9.4用法)：

req <- parse "https://some_url"
let request = req { requestHeaders = [customHeader] }

我不明白什么应该是customHeader？我试过了

import Network.HTTP.Headers
let custom_header = mkHeader (HdrCustom "Some-Header") "Some-Value"

但是发生了一个错误

Couldn't match expected type `Network.HTTP.Types.Header.Header'
                with actual type `Header'
    In the expression: custom_header
    In the `requestHeaders' field of a record
    In the expression: req {requestHeaders = [custom_header]}

我也试过了

let custom_header = ("Some-Header", "Some-Value")

和错误

Couldn't match expected type `Network.HTTP.Types.Header.HeaderName'
                with actual type `[Char]'
    In the expression: "User-Agent"
    In the expression: ("User-Agent", "erthalion")
    In the `requestHeaders' field of a record

那么，有人知道什么应该是customHeader吗？

Answer 1

http-conduit根本不使用HTTP包，它们是两种完全不同的方法。如果您查看http-types文档，您会发现Header只是一个头名称和值的元组。

您的custom_header不工作的唯一原因是您需要打开OverloadedStrings语言扩展。