slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ui: cleanup

Browse Source
This commit is contained in:
Simon Michael 2015-11-06 21:17:09 -08:00
parent a8d9178ee2
commit ed775e1ef4
1 changed files with 1 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
hledger-ui/Hledger/UI/RegisterScreen.hs
View File

@ -57,13 +57,7 @@ initRegisterScreen d st@AppState{aopts=opts, ajournal=j, aScreen=s@RegisterScree
q = filterQuery (not . queryIsDepth) $ queryFromOpts d ropts q = filterQuery (not . queryIsDepth) $ queryFromOpts d ropts
-- run a transactions report, most recent last -- run a transactions report, most recent last
q' = (_label,items') = accountTransactionsReport ropts j q thisacctq
-- ltrace "q"
q
thisacctq' =
-- ltrace "thisacctq"
thisacctq
(_label,items') = accountTransactionsReport ropts j q' thisacctq'
items = reverse items' items = reverse items'
-- pre-render all items; these will be the List elements. This helps calculate column widths. -- pre-render all items; these will be the List elements. This helps calculate column widths.