haskell - 匹配站点根目录，使用 snap 网络框架

Question

我正在用 Snap 建立一个网站。

在我的路线中，如何匹配站点的根目录？

IE

routes = [(ByteString, Handler App App ())]
routes = [("/", redirect "www.google.com")]

上面的代码在 (localhost:8000/) 调用时不会重定向。

Answer 1

如果您有一个名为 的模板index.tpl，那么"/"处理程序将永远不会被调用。我通过反复试验发现了这一点。

Answer 2

您需要将“http://”添加到 URI。这适用于我的机器：

routes = [("/", redirect "http://www.google.com")]

您还可以使用ifTop：

site :: Snap ()
site = ifTop (redirect "http://www.google.com) <|>
       route routes 

Whereroutes包含您网站的剩余路线。