yesod中如何将Json转换为Html？

Question

yesod-0.9.3 中是否有某种方法可以将 Json 转换为 Html 以将其包含到

使用 Yesod.Json 和 Data.Aeson 我可以获得 Json 类型的值，我想将其用作变量的值在

Answer 1

使用完全限定名称...

let txtVal = Data.Text.Lazy.Encoding.decodeUtf8 $ Data.Aeson.encode jsonVal

然后，在您的小村庄内：

<script>
  var v = #{txtVal}

请注意，这有点危险，因为它不会检查编码是否成功。有关详细信息，请参阅 Data.Text.Encoding 模块。