Unified Address support #8
1 changed files with 1 additions and 1 deletions
|
@ -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
|
||||||
|
|
Loading…
Reference in a new issue