Add error class when help text is an error.

This commit is contained in:
silky 2015-12-23 16:00:37 +11:00
parent d346b8361f
commit 6ec02a917f

View File

@ -191,7 +191,7 @@ helpWidget view = [whamlet|
$maybe tt <- fvTooltip view $maybe tt <- fvTooltip view
<span .help-block>#{tt} <span .help-block>#{tt}
$maybe err <- fvErrors view $maybe err <- fvErrors view
<span .help-block>#{err} <span .help-block .error-block>#{err}
|] |]