yesod-form 1.2.0.1 → 1.2.0.2
raw patch · 2 files changed
+12/−3 lines, 2 filesdep ~persistent
Dependency ranges changed: persistent
Files
- Yesod/Form/Fields.hs +10/−1
- yesod-form.cabal +2/−2
Yesod/Form/Fields.hs view
@@ -71,6 +71,9 @@ import Blaze.ByteString.Builder (writeByteString, toLazyByteString) import Blaze.ByteString.Builder.Internal.Write (fromWriteList) import Database.Persist.Store (PersistEntityBackend)+#if MIN_VERSION_persistent(1, 1, 0)+import Database.Persist.Store (PersistMonadBackend)+#endif import Text.Blaze.Html.Renderer.String (renderHtml) import qualified Data.ByteString as S@@ -492,10 +495,16 @@ optionsEnum = optionsPairs $ map (\x -> (pack $ show x, x)) [minBound..maxBound] optionsPersist :: ( YesodPersist master, PersistEntity a+#if MIN_VERSION_persistent(1, 1, 0)+ , PersistQuery (YesodPersistBackend master (GHandler sub master))+ , PathPiece (Key a)+ , PersistEntityBackend a ~ PersistMonadBackend (YesodPersistBackend master (GHandler sub master))+#else , PersistQuery (YesodPersistBackend master) (GHandler sub master) , PathPiece (Key (YesodPersistBackend master) a)- , RenderMessage master msg , PersistEntityBackend a ~ YesodPersistBackend master+#endif+ , RenderMessage master msg ) => [Filter a] -> [SelectOpt a] -> (a -> msg) -> GHandler sub master (OptionList (Entity a)) optionsPersist filts ords toDisplay = fmap mkOptionList $ do
yesod-form.cabal view
@@ -1,5 +1,5 @@ name: yesod-form-version: 1.2.0.1+version: 1.2.0.2 license: MIT license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>@@ -20,7 +20,7 @@ , hamlet >= 1.1 && < 1.2 , shakespeare-css >= 1.0 && < 1.1 , shakespeare-js >= 1.0.2 && < 1.2- , persistent >= 1.0 && < 1.1+ , persistent >= 1.0 && < 1.2 , template-haskell , transformers >= 0.2.2 && < 0.4 , data-default