diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs index d1555a3..726ef72 100644 --- a/src/ZGoBackend.hs +++ b/src/ZGoBackend.hs @@ -1994,6 +1994,7 @@ scanTxNative config pipe = do txList <- mapM (getTxData nodeUser nodePwd) txIdList print "filtering txs..." let filteredTxList = map fromJust $ filter filterTx txList + print $ show filteredTxList print "checking txs against keys..." mapM_ (checkTx filteredTxList) ownerList access pipe master (c_dbName config) $