From ed775e1ef464a3a1d6468c1f451c912b007c73da Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 6 Nov 2015 21:17:09 -0800 Subject: [PATCH] ui: cleanup --- hledger-ui/Hledger/UI/RegisterScreen.hs | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs index 1424df923..d91220a4e 100644 --- a/hledger-ui/Hledger/UI/RegisterScreen.hs +++ b/hledger-ui/Hledger/UI/RegisterScreen.hs @@ -57,13 +57,7 @@ initRegisterScreen d st@AppState{aopts=opts, ajournal=j, aScreen=s@RegisterScree q = filterQuery (not . queryIsDepth) $ queryFromOpts d ropts -- run a transactions report, most recent last - q' = - -- ltrace "q" - q - thisacctq' = - -- ltrace "thisacctq" - thisacctq - (_label,items') = accountTransactionsReport ropts j q' thisacctq' + (_label,items') = accountTransactionsReport ropts j q thisacctq items = reverse items' -- pre-render all items; these will be the List elements. This helps calculate column widths.