Haskell 如何删除“；服务器"；仆人头？

我正在使用仆人图书馆。我试着从一些博客文章中修改一种方法，但在删除“服务器”标题的情况下，它没有任何作用。（它仅适用于添加自定义标题。）

查看跟踪，可能会在稍后添加标题

[("Content-Type","application/json;charset=utf-8")]

---

我在warp中找到了

setServerName

，但我不知道如何将其与servant结合。

setServerName的文档说明：

如果应用程序未设置“服务器：”标头，则发送的默认服务器名称。如果设置了空字符串，则不会发送“服务器：”标头。即使应用程序设置了一个，这也是正确的

从

因此，要禁用服务器头，请使用空字符串设置服务器名

若要使用此端口，请将

运行端口

替换为

runSettings (setPort port (setServerName "" defaultSettings))

[("Content-Type","application/json;charset=utf-8")]

runSettings (setPort port (setServerName "" defaultSettings))