yesod-form 1.3.5.1 → 1.3.5.2

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• Yesod/Form/Types.hs +1/−1
• yesod-form.cabal +1/−1

@@ -98,7 +98,7 @@       where         go (w, x, y, z) = (fmap f w, x, y, z) instance Monad m => Applicative (AForm m) where-    pure x = AForm $ const $ const $ \ints -> return (FormSuccess x, mempty, ints, mempty)+    pure x = AForm $ const $ const $ \ints -> return (FormSuccess x, id, ints, mempty)     (AForm f) <*> (AForm g) = AForm $ \mr env ints -> do         (a, b, ints', c) <- f mr env ints         (x, y, ints'', z) <- g mr env ints'

@@ -1,5 +1,5 @@ name:            yesod-form-version:         1.3.5.1+version:         1.3.5.2 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>