diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -4,6 +4,10 @@
 The format is based on [Keep a Changelog](http://keepachangelog.com/en/1.0.0/)
 and this project adheres to [Semantic Versioning](http://semver.org/spec/v2.0.0.html)
 
+## 0.61.0
+### Fixed
+- Fixed recursion bug in Blockchain format conversion function.
+
 ## 0.60.0
 ### Fixed
 - Correct notifications subsystem.
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.60.0
+version:        0.61.0
 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
@@ -60,7 +60,7 @@
     , hashable >=1.3.0.0
     , haskoin-core >=0.21.0
     , haskoin-node >=0.17.0
-    , haskoin-store-data ==0.60.0
+    , haskoin-store-data ==0.61.0
     , hedis >=0.12.13
     , http-types >=0.12.3
     , lens >=4.18.1
@@ -116,7 +116,7 @@
     , haskoin-core >=0.21.0
     , haskoin-node >=0.17.0
     , haskoin-store
-    , haskoin-store-data ==0.60.0
+    , haskoin-store-data ==0.61.0
     , hedis >=0.12.13
     , http-types >=0.12.3
     , lens >=4.18.1
@@ -177,7 +177,7 @@
     , haskoin-core >=0.21.0
     , haskoin-node >=0.17.0
     , haskoin-store
-    , haskoin-store-data ==0.60.0
+    , haskoin-store-data ==0.61.0
     , hedis >=0.12.13
     , hspec >=2.7.1
     , http-types >=0.12.3
diff --git a/src/Haskoin/Store/BlockStore.hs b/src/Haskoin/Store/BlockStore.hs
--- a/src/Haskoin/Store/BlockStore.hs
+++ b/src/Haskoin/Store/BlockStore.hs
@@ -392,9 +392,8 @@
     lift . notify (Just block) $
         runImport (importBlock block node) >>= \case
             Left e   -> failure e
-            Right ths -> success node
+            Right () -> success node
   where
-    exclude = map txHash $ blockTxns block
     header = blockHeader block
     blockhash = headerHash header
     hexhash = blockHashToHex blockhash
diff --git a/src/Haskoin/Store/Logic.hs b/src/Haskoin/Store/Logic.hs
--- a/src/Haskoin/Store/Logic.hs
+++ b/src/Haskoin/Store/Logic.hs
@@ -66,8 +66,6 @@
     | InsufficientFunds
     | DuplicatePrevOutput
     | TxSpent
-    | OrphanLoop
-    | SpenderNotFound
     deriving (Eq, Ord, Exception)
 
 instance Show ImportException where
@@ -82,8 +80,6 @@
     show InsufficientFunds   = "Insufficient funds"
     show DuplicatePrevOutput = "Duplicate previous output"
     show TxSpent             = "Transaction is spent"
-    show OrphanLoop          = "Orphan loop"
-    show SpenderNotFound     = "Spender not found"
 
 initBest :: MonadImport m => m ()
 initBest = do