Vergara_Tech/zgo-backend
Vergara_Tech/zgo-backend
2
1
Fork 0
Code Issues Pull requests Projects Releases 4 Packages Wiki Activity

Correct tx filtering

Browse source
This commit is contained in:
Rene Vergara 2023-09-29 14:33:17 -05:00
parent 74ba9d23f0
commit d235c56cfb
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/ZGoBackend.hs
View file

@ -1855,7 +1855,7 @@ scanTxNative pipe db nodeUser nodePwd = do
filterBlock b = maybe 0 bl_confirmations b >= 5 filterBlock b = maybe 0 bl_confirmations b >= 5
filterTx :: Maybe RawTxResponse -> Bool filterTx :: Maybe RawTxResponse -> Bool
filterTx t = filterTx t =
not (null (maybe [] rt_shieldedOutputs t)) && not (null (maybe [] rt_shieldedOutputs t)) ||
not (null (maybe [] rt_orchardActions t)) not (null (maybe [] rt_orchardActions t))
extractTxs :: Maybe BlockResponse -> [T.Text] extractTxs :: Maybe BlockResponse -> [T.Text]
extractTxs = maybe [] bl_txs extractTxs = maybe [] bl_txs