avers 0.0.11 → 0.0.12

raw patch · 2 files changed

+4/−3 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• avers.cabal +1/−1
• src/Avers/Storage.hs +3/−2

@@ -1,5 +1,5 @@ name:                avers-version:             0.0.11+version:             0.0.12 license:             GPL-3 license-file:        LICENSE author:              Tomas Carnecky

@@ -295,7 +295,8 @@     patches <- patchesAfterRevision objId (snapshotRevisionId snapshot)      -- Apply those patches to the snapshot.-    foldM applyPatchToSnapshot snapshot patches+    foldM applyPatchToSnapshot snapshot $+        filter (\Patch{..} -> unRevId patchRevisionId <= revId) patches   @@ -359,7 +360,7 @@ patchesAfterRevision objId (RevId revId) = measureDuration M_avers_storage_patchesAfterRevision_duration $ do     res <- runQueryCollect $         R.OrderBy [R.Ascending "revisionId"] $-        objectPatchSequenceE objId revId maxBound+        objectPatchSequenceE objId (revId + 1) maxBound      V.toList <$> V.mapM parseDatum res