ui: cleanup

This commit is contained in:
Simon Michael 2015-11-06 21:17:09 -08:00
parent a8d9178ee2
commit ed775e1ef4

View File

@ -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.