haskell - 在 Hasekll Spock 中为静态资产或图像创建路由

Question

我从其网站上获取了这个基本的 Spock 应用程序：

main :: IO ()
main =
    do ref <- newIORef 0
       spockCfg <- defaultSpockCfg EmptySession PCNoDatabase (DummyAppState ref)
       runSpock 8080 (spock spockCfg app)

app :: SpockM () MySession MyAppState ()
app =
    do get root $
           text "Hello World!"
       get -- ??? route for "/img/"???

我有一个 html 页面，我可以像这样返回：

然而，一个 html 页面包含一些“img”标签。我如何需要创建一条路线才能解析图像？说，图像是文件夹“img”中的位置。

Answer 1

我喜欢做的是使用wai-middleware-static中间件来提供静态目录：

app :: SpockM () MySession MyAppState ()
app = do
    middleware $ staticPolicy (addBase "static")
    ...