我怎么告诉Suave不要缓存网址？

Question

我有2条路径被缓存

Auth.loggedOn (
    GET >=>
        pathScan "/era/%i" (Some >> EraViewing.eraView homeFolder cn)
        path "/" >=> indexView homeFolder cn

在替换一些模板化部分后，每个文件后面都有一个x.html文件。

哪些是缓存的，但我不希望它们。我怎么能告诉他们不是？

不是the same question，因为那个是通过创建一个函数而不是告诉suave不缓存或何时重新计算/重新评估URL来解决的

Answer 1

要指示浏览器不缓存响应，您可以定义以下组合器。

let noCache = 
  setHeader "Cache-Control" "no-cache, no-store, must-revalidate"
  >=> setHeader "Pragma" "no-cache"
  >=> setHeader "Expires" "0"

并使用它，如下所示

let app = OK "Hello" >=> noCache