yesod-form 1.3.10 → 1.3.11
raw patch · 2 files changed
+13/−1 lines, 2 files
Files
- Yesod/Form/Functions.hs +12/−0
- yesod-form.cabal +1/−1
Yesod/Form/Functions.hs view
@@ -23,6 +23,7 @@ , runFormGet -- * Generate a blank form , generateFormPost+ , generateFormGet' , generateFormGet -- * More than one form on a handler , identifyForm@@ -269,6 +270,17 @@ Just _ -> Just (Map.unionsWith (++) $ map (\(x, y) -> Map.singleton x [y]) gets, Map.empty) getHelper form env +{- FIXME: generateFormGet' "Will be renamed to generateFormGet in next verison of Yesod" -}+-- |+--+-- Since 1.3.11+generateFormGet'+ :: (RenderMessage (HandlerSite m) FormMessage, MonadHandler m)+ => (Html -> MForm m (FormResult a, xml))+ -> m (xml, Enctype)+generateFormGet' form = first snd `liftM` getHelper form Nothing++{-# DEPRECATED generateFormGet "Will require RenderMessage in next verison of Yesod" #-} generateFormGet :: MonadHandler m => (Html -> MForm m a) -> m (a, Enctype)
yesod-form.cabal view
@@ -1,5 +1,5 @@ name: yesod-form-version: 1.3.10+version: 1.3.11 license: MIT license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>