如何从Yesod中的WidgetT（HandlerSite LiteHandler）IO（）值中提取Html

Question

沙洛姆！我有以下代码：

widget_member :: Html -> MForm LiteHandler (FormResult Member, WidgetT (HandlerSite LiteHandler) IO ())
widget_member = renderDivs input_member

handler_home :: LiteHandler Html
handler_home = do
    (widget, e) <- generateFormPost widget_member

有人能说明如何从widget中提取Html，以便handler_home可以返回它吗？

Answer 1

您可能不想实际提取Html;你可能想调用defaultLayout函数。大多数使用表单的例子采用这种方法。