Add error class when help text is an error.

2015-12-23 16:00:37 +11:00 · 2015-12-23 16:00:37 +11:00 · 6ec02a917f
commit 6ec02a917f
parent d346b8361f
1 changed files with 2 additions and 2 deletions
--- a/yesod-form/Yesod/Form/Bootstrap3.hs
+++ b/yesod-form/Yesod/Form/Bootstrap3.hs
@ -191,7 +191,7 @@ helpWidget view = [whamlet|
    $maybe tt <- fvTooltip view
      <span .help-block>#{tt}
    $maybe err <- fvErrors view
-      <span .help-block>#{err}
+      <span .help-block .error-block>#{err}
 |]