From 8e05df072734eadf11933c9a71982d35f724e14c Mon Sep 17 00:00:00 2001 From: Rene Vergara Date: Thu, 11 May 2023 15:31:27 -0500 Subject: [PATCH] Improve debugging info --- src/ZGoBackend.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs index 27b0783..32d3190 100644 --- a/src/ZGoBackend.hs +++ b/src/ZGoBackend.hs @@ -376,7 +376,7 @@ zToZGoTx' config pipe (ZcashTx t a aZ bh bt c conf m) = do if m_payment zM' then upsertPayment pipe (c_dbName config) tx else access pipe master (c_dbName config) $ upsertZGoTx "txs" tx - Left e -> error $ "Failed to parse ZGo memo: " ++ show e + Left e -> print $ "Failed to parse ZGo memo: " ++ show e -- |Type to model a price in the ZGo database data ZGoPrice =