Haskell Scotty：设置自定义标题（x帧选项）

哈斯克尔新手在这里

在我的haskell端项目中，我使用scotty来提供一些动态生成的html页面。问题在于，由于“x-frame-options”标题设置为“SAMEORIGIN”，因此无法在iframe内打开页面

如何将标题更改为其他内容？我想为所有回复设置标题。有没有一个中间件可以做到这一点

---

谢谢

您可以定义自己的中间件，将此头添加到每个响应中（所有必要的工具都可以在中获得）：

然后在scotty应用程序中使用它：

main = scotty 6000 $ do
  middleware addFrameHeader
  get "/" (text "hello")

通过

curl

我们可以看到它包含在响应中：

> curl --include localhost:6000
HTTP/1.1 200 OK
Transfer-Encoding: chunked
Date: Thu, 19 Jan 2017 19:22:57 GMT
Server: Warp/3.2.8
X-Frame-Options: whatever
Content-Type: text/plain; charset=utf-8

hello

> curl --include localhost:6000
HTTP/1.1 200 OK
Transfer-Encoding: chunked
Date: Thu, 19 Jan 2017 19:22:57 GMT
Server: Warp/3.2.8
X-Frame-Options: whatever
Content-Type: text/plain; charset=utf-8

hello