persistent-mongoDB 2.0.8.1 → 2.0.9
raw patch · 2 files changed
+9/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Database.Persist.MongoDB: keyToText :: BackendKey MongoContext -> Text
+ Database.Persist.MongoDB: readMayKey :: Text -> Maybe (BackendKey MongoContext)
+ Database.Persist.MongoDB: readMayObjectId :: Text -> Maybe ObjectId
Files
Database/Persist/MongoDB.hs view
@@ -55,6 +55,9 @@ , keyToOid , oidToKey , recordTypeFromKey+ , readMayObjectId+ , readMayKey+ , keyToText -- * PersistField conversion , fieldName@@ -218,9 +221,12 @@ -- | Convert a Text to a Key readMayKey :: Text -> Maybe (BackendKey DB.MongoContext)-readMayKey str =+readMayKey = fmap MongoKey . readMayObjectId++readMayObjectId :: Text -> Maybe DB.ObjectId+readMayObjectId str = case filter (null . snd) $ reads $ T.unpack str :: [(DB.ObjectId,String)] of- (parsed,_):[] -> Just $ MongoKey parsed+ (parsed,_):[] -> Just parsed _ -> Nothing instance PersistField DB.ObjectId where
persistent-mongoDB.cabal view
@@ -1,5 +1,5 @@ name: persistent-mongoDB-version: 2.0.8.1+version: 2.0.9 license: MIT license-file: LICENSE author: Greg Weber <greg@gregweber.info>