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

whitespace

Browse Source
This commit is contained in:
Simon Michael 2011-06-24 02:41:37 +00:00
parent 059825a9b2
commit 6a61c96481
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hledger/Hledger/Cli/Balance.hs
View File

@ -175,7 +175,7 @@ formatAccount opts accountName depth balance leftJustified min max field = case
Just m -> formatValue leftJustified Nothing max $ replicate (depth * m) ' ' Just m -> formatValue leftJustified Nothing max $ replicate (depth * m) ' '
Nothing -> formatValue leftJustified Nothing max $ replicate depth ' ' Nothing -> formatValue leftJustified Nothing max $ replicate depth ' '
Total -> formatValue leftJustified min max $ showAmountWithoutPrice balance Total -> formatValue leftJustified min max $ showAmountWithoutPrice balance
_ -> "" _ -> ""
where where
a = maybe "" (accountNameDrop (drop_ opts)) accountName a = maybe "" (accountNameDrop (drop_ opts)) accountName