diff --git a/hledger-lib/Hledger/Reports/TransactionsReports.hs b/hledger-lib/Hledger/Reports/TransactionsReports.hs index b433de226..0da2d0ebf 100644 --- a/hledger-lib/Hledger/Reports/TransactionsReports.hs +++ b/hledger-lib/Hledger/Reports/TransactionsReports.hs @@ -166,7 +166,7 @@ accountTransactionsReportItems query thisacctquery bal signfn (torig:ts) = case i of Just i' -> i':is Nothing -> is where - tacct@Transaction{tpostings=queryps} = dbg0 "tacct" $ filterTransactionPostings query torig + tacct@Transaction{tpostings=queryps} = filterTransactionPostings query torig (thisacctps, otheracctps) = -- partition (matchesPosting thisacctquery) queryps case thisacctquery of None -> ([],queryps) q -> partition (matchesPosting q) queryps