diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs
index 62eda60..c6b08d7 100644
--- a/src/ZGoBackend.hs
+++ b/src/ZGoBackend.hs
@@ -1879,6 +1879,11 @@ scanTxNative pipe db nodeUser nodePwd = do
       if isValidSaplingViewingKey (E.encodeUtf8 k)
         then do
           print "decoding Sapling tx"
+          let i =
+                concatMap
+                  rt_shieldedOutputs
+                  (filter (\y -> rt_shieldedOutputs y /= []) txList)
+          print i
           let decodedTxList =
                 map
                   (decodeSaplingOutput (bytes (decodeBech32 $ E.encodeUtf8 k)))