-- >
-renderBootstrap :: Monad m => FormRender m a
-renderBootstrap aform fragment = do
+--
+-- Since 1.3.14
+renderBootstrap2 :: Monad m => FormRender m a
+renderBootstrap2 aform fragment = do
(res, views') <- aFormToForm aform
let views = views' []
has (Just _) = True
@@ -446,6 +449,10 @@ renderBootstrap aform fragment = do
#{err}
|]
return (res, widget)
+
+-- | Deprecated synonym for 'renderBootstrap2'.
+renderBootstrap :: Monad m => FormRender m a
+renderBootstrap = renderBootstrap2
{-# DEPRECATED renderBootstrap "Please use the Yesod.Form.Bootstrap3 module." #-}
check :: (Monad m, RenderMessage (HandlerSite m) msg)
diff --git a/yesod-form/yesod-form.cabal b/yesod-form/yesod-form.cabal
index db225636..11b852fd 100644
--- a/yesod-form/yesod-form.cabal
+++ b/yesod-form/yesod-form.cabal
@@ -1,5 +1,5 @@
name: yesod-form
-version: 1.3.13
+version: 1.3.14
license: MIT
license-file: LICENSE
author: Michael Snoyman