我正在尝试从客户端到服务器进行基本的
JSON通信,使用以下Elm代码：
import open Http
result res = case res of
Success a -> a
Waiting -> "Waiting"
Failure n a-> "Failure " ++ (show n) ++ " " ++ (show a)
main = lift asText <| lift (show . result) <| send <| constant <| post "http://localhost:3000" "{foo : true}"
服务器完全如this part of the Yesod book所示.
但是,当我运行请求时,我得到了输出
"\"Failure 0 []\""
有没有人知道我要做些什么来让Elm客户端与Yesod服务器正常通信？我尝试过一个Python客户端,请求工作得很好.同样,在Yesod网站上有几个成功的Http请求的例子,所以我相信两个库都正常工作,但我使用它们是错误的.
更新：问题是客户端.我能够使用Chrome并禁用安全选项,并且不对Yesod进行任何更改.我会寻找一种解决方法,但这至少足以让我的开发继续下去.