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 =