Yesod形式でフィールドラベルを付けない標準的な方法はありますか?私のフォームは、フィールドに何を入れるかを明確にし、ラベルは必要ありません。これまで、renderDivsをコピーして変更することにより、自分でコーディングしてきました。
renderDivsNoLabel aform fragment = do
(res, views') <- aFormToForm aform
let views = views' []
let widget = [whamlet|
\#{fragment}
$forall view <- views
<div :fvRequired view:.required :not $ fvRequired view:.optional>
$maybe tt <- fvTooltip view
<div .tooltip>#{tt}
^{fvInput view}
$maybe err <- fvErrors view
<div .errors>#{err}
|]
return (res, widget)
もっと簡単な方法はありますか?
ありがとう!