haskoin-store 0.40.9 → 0.40.10
raw patch · 2 files changed
+6/−10 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- haskoin-store.cabal +1/−1
- src/Haskoin/Store/Cache.hs +5/−9
haskoin-store.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack name: haskoin-store-version: 0.40.9+version: 0.40.10 synopsis: Storage and index for Bitcoin and Bitcoin Cash description: Please see the README on GitHub at <https://github.com/haskoin/haskoin-store#readme> category: Bitcoin, Finance, Network
src/Haskoin/Store/Cache.hs view
@@ -572,17 +572,13 @@ (MonadUnliftIO m, MonadLoggerIO m, StoreReadExtra m) => CacheWriterMessage -> CacheX m () cacheWriterReact CacheNewBlock =- inSync >>= \s ->- when s $ do+ inSync >>= \s -> when s newBlockC- syncMempoolC cacheWriterReact (CachePing respond) =- inSync >>= \s ->- when s $ do- pruneDB- newBlockC- syncMempoolC- atomically $ respond ()+ inSync >>= \s -> when s $+ syncMempoolC >>+ pruneDB >>+ atomically (respond ()) lenNotNull :: [XPubBal] -> Int lenNotNull bals = length $ filter (not . nullBalance . xPubBal) bals