packages feed

eventsource-stub-store 1.0.0 → 1.0.1

raw patch · 4 files changed

+10/−14 lines, 4 filesdep ~eventsource-apiPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: eventsource-api

API changes (from Hackage documentation)

Files

CHANGELOG.md view
@@ -1,7 +1,3 @@-# Change log--stub-store uses [Semantic Versioning][].-The change log is available through the [releases on GitHub][].--[Semantic Versioning]: http://semver.org/spec/v2.0.0.html-[releases on GitHub]: https://github.com/githubuser/stub-store/releases+1.0.1+=====+  * Support changes in api.
eventsource-stub-store.cabal view
@@ -3,7 +3,7 @@ -- see: https://github.com/sol/hpack  name:           eventsource-stub-store-version:        1.0.0+version:        1.0.1 synopsis:       An in-memory stub store implementation. description:    An in-memory stub store implementation. category:       Eventsourcing@@ -34,7 +34,7 @@   ghc-options: -Wall   build-depends:       base >=4.9 && <5-    , eventsource-api ==1.*+    , eventsource-api >=1.1     , protolude >=0.1.10 && <0.2     , containers     , mtl
library/EventSource/Store/Stub.hs view
@@ -89,7 +89,7 @@       let num = streamNextNumber s           evts = streamEvents s in       s { streamNextNumber = num + 1-        , streamEvents = evts |> SavedEvent num e+        , streamEvents = evts |> SavedEvent num e Nothing         }  --------------------------------------------------------------------------------@@ -143,7 +143,7 @@            -- This part is already performed in 'appendStream' but difficult           -- to take its logic apart from building 'SavedEvent's.-          let saved = uncurry SavedEvent <$> zip [0..] events+          let saved = (\(num, evt) -> SavedEvent num evt Nothing) <$> zip [0..] events           notifySubs self name saved           let Just last = getLast $ foldMap (Last . Just) saved               nextNum = eventNumber last + 1@@ -169,7 +169,7 @@            -- This part is already performed in 'appendStream' but difficult           -- to take its logic apart from building 'SavedEvent's.-          let saved = uncurry SavedEvent <$> zip [currentNumber..] events+          let saved = (\(num, evt) -> SavedEvent num evt Nothing) <$> zip [currentNumber..] events           notifySubs self name saved           let Just last = getLast $ foldMap (Last . Just) saved               nextNum = eventNumber last + 1
package.yaml view
@@ -16,7 +16,7 @@     - NoImplicitPrelude   dependencies:   - base >=4.9 && <5-  - eventsource-api ==1.*+  - eventsource-api >=1.1   - protolude >=0.1.10 && <0.2   - containers   - mtl@@ -43,4 +43,4 @@     - -with-rtsopts=-N     main: Main.hs     source-dirs: test-suite-version: '1.0.0'+version: '1.0.1'