diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs index 00fad1a..31c51b8 100644 --- a/src/ZGoBackend.hs +++ b/src/ZGoBackend.hs @@ -1855,7 +1855,7 @@ scanTxNative pipe db nodeUser nodePwd = do filterBlock b = maybe 0 bl_confirmations b >= 5 filterTx :: Maybe RawTxResponse -> Bool filterTx t = - not (null (maybe [] rt_shieldedOutputs t)) && + not (null (maybe [] rt_shieldedOutputs t)) || not (null (maybe [] rt_orchardActions t)) extractTxs :: Maybe BlockResponse -> [T.Text] extractTxs = maybe [] bl_txs