eventsource-geteventstore-store 1.0.6 → 1.1.0

raw patch · 4 files changed

+17/−11 lines, 4 filesdep ~eventsource-apidep ~eventstorePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: eventsource-api, eventstore

API changes (from Hackage documentation)

Files

CHANGELOG.md +4/−0
eventsource-geteventstore-store.cabal +5/−5
library/EventSource/Store/GetEventStore.hs +4/−2
package.yaml +4/−4

CHANGELOG.md view

@@ -1,3 +1,7 @@+1.0.6+=====+* Support evenstore >= 1.1+ 1.0.5 ===== * Dependencies cleaning.

eventsource-geteventstore-store.cabal view

@@ -2,10 +2,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 38e454f35fc75e3be8f121aaefc134fbcbcc57f3b75bf6f0883edfbffffb90e9+-- hash: 2f7d6b067b79c8e983367020e1da7747b66bdc8de579d77677a35442661b4f34  name:           eventsource-geteventstore-store-version:        1.0.6+version:        1.1.0 synopsis:       GetEventStore store implementation. description:    GetEventStore store implementation. category:       Eventsourcing@@ -35,8 +35,8 @@   build-depends:       aeson     , base >=4.9 && <5-    , eventsource-api >=1.1-    , eventstore >=0.14 && <1.1+    , eventsource-api >=1.3+    , eventstore >=1.1     , mtl     , string-conversions     , transformers-base@@ -57,7 +57,7 @@     , eventsource-api     , eventsource-geteventstore-store     , eventsource-store-specs ==1.*-    , eventstore+    , eventstore >=1.1     , protolude     , tasty     , tasty-hspec

library/EventSource/Store/GetEventStore.hs view

@@ -132,15 +132,17 @@   appendEvents (GetEventStore conn) name ver xs = liftBase $ do     events <- traverse makeEvent xs     w <- GES.sendEvents conn (toGESStreamName name) (toGesExpVer ver) events+          Nothing     return $ fmap (EventNumber . GES.writeNextExpectedVersion) w    readBatch (GetEventStore conn) name b = liftBase $ do     let EventNumber n = batchFrom b-    w <- GES.readStreamEventsForward conn (toGESStreamName name) n (batchSize b) True+    w <- GES.readStreamEventsForward conn (toGESStreamName name) n (batchSize b)+          True Nothing     return $ fmap (fmap fromGesSlice . fromGesReadResult name) w    subscribe (GetEventStore conn) name = liftBase $ do-    sub <- GES.subscribe conn (toGESStreamName name) True+    sub <- GES.subscribe conn (toGESStreamName name) True Nothing     sid <- freshSubscriptionId      return $ Subscription sid $ liftBase $

package.yaml view

@@ -13,8 +13,8 @@ library:   dependencies:   - base >=4.9 && <5-  - eventstore >=0.14 && <1.1-  - eventsource-api >= 1.1+  - eventstore >=1.1+  - eventsource-api >= 1.3   - aeson   - mtl   - transformers-base@@ -33,7 +33,7 @@     - eventsource-geteventstore-store     - eventsource-api     - eventsource-store-specs ==1.*-    - eventstore+    - eventstore >= 1.1     - tasty     - tasty-hspec     - protolude@@ -43,4 +43,4 @@     - -with-rtsopts=-N     main: Main.hs     source-dirs: test-suite-version: '1.0.6'+version: '1.1.0'