diff --git a/haskoin-store.cabal b/haskoin-store.cabal
--- a/haskoin-store.cabal
+++ b/haskoin-store.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           haskoin-store
-version:        0.40.7
+version:        0.40.8
 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
diff --git a/src/Haskoin/Store/Cache.hs b/src/Haskoin/Store/Cache.hs
--- a/src/Haskoin/Store/Cache.hs
+++ b/src/Haskoin/Store/Cache.hs
@@ -928,7 +928,7 @@
     m = Just 500
     ps = Just 10
     pm = Nothing
-    when_cool k m s f = is_cool k >>= \c -> when c f >> cooldown k m s
+    when_cool k m s f = is_cool k >>= \c -> when c $ f >> cooldown k m s
     is_cool k = isNothing <$> runRedis (Redis.get k)
     cooldown k sec ms =
         let opts = Redis.SetOpts