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

show the balance report's zero total when -E is used

Browse Source
This commit is contained in:
Simon Michael 2009-04-02 06:22:39 +00:00
parent 9203588d6d
commit 83b0ebf832
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
BalanceCommand.hs
View File

@ -129,7 +129,7 @@ showBalanceReport opts args l = acctsstr ++ totalstr
interestingaccts = filter (isInteresting opts l) acctnames interestingaccts = filter (isInteresting opts l) acctnames
acctnames = sort $ tail $ flatten $ treemap aname accttree acctnames = sort $ tail $ flatten $ treemap aname accttree
accttree = ledgerAccountTree (depthFromOpts opts) l accttree = ledgerAccountTree (depthFromOpts opts) l
totalstr | isZeroMixedAmount total = "" totalstr | not (Empty `elem` opts) && isZeroMixedAmount total = ""
| otherwise = printf "--------------------\n%s\n" $ padleft 20 $ showMixedAmount total | otherwise = printf "--------------------\n%s\n" $ padleft 20 $ showMixedAmount total
where where
total = sum $ map abalance $ topAccounts l total = sum $ map abalance $ topAccounts l