如何使用带有路由参数的hamlet模板?

时间:2018-05-26 14:28:11

标签: forms routes yesod hamlet

我正在使用基于yesod-postgres堆栈模板的yesod应用程序。我在config/routes中定义了一个路径,其格式为:

foo/edit/#Text EditFooR GET

在我的hamlet模板中,我想写

<form method=post action=@{EditFooR}#forms enctype=#{formEnctype}>
                    ^{formWidget}

                    <button type="submit">
                        Submit

在我的处理程序中,我想写一下:

getEditFooR :: T.Text -> Handler Html
getEditFooR name = do
    ....
    text <- findTextByName name

    (formWidget, formEnctype) <- generateFormPost (editFooForm text)
    defaultLayout $ do
        $(widgetFile "editFoo")

除了我需要为@{EditFooR}路由提供参数。如何在哈姆雷特文件/处理程序中完成?

1 个答案:

答案 0 :(得分:0)

答案是.hamlet模板的格式应为:

<form method=post action=@{EditFooR fooName}#forms enctype=#{formEnctype}>
                ^{formWidget}

                <button type="submit">
                    Submit

并且Handler的格式应为:

getEditFooR :: T.Text -> Handler Html
getEditFooR name = do
    ....
    text <- findTextByName name
    fooName <- "something or other"

   (formWidget, formEnctype) <- generateFormPost (editFooForm text)
       defaultLayout $ do
       $(widgetFile "editFoo")