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

lib: multiBalanceReport: Get --drop working with multiBalanceReports.

Browse Source
This commit is contained in:
Stephen Morgan 2020-06-13 22:21:14 +10:00
parent 6467c252c7
commit cd41404fd4
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-lib/Hledger/Reports/MultiBalanceReport.hs
View File

@ -348,7 +348,7 @@ displayedAccounts ropts q valuedaccts =
displayedName name displayedName name
| depth == 0 = DisplayName "..." "..." 0 | depth == 0 = DisplayName "..." "..." 0
| tree_ ropts = treeDisplayName name | tree_ ropts = treeDisplayName name
| otherwise = flatDisplayName name | otherwise = DisplayName name (accountNameDrop (drop_ ropts) name) 0
where where
elided = accountNameFromComponents . reverse . map accountLeafName $ elided = accountNameFromComponents . reverse . map accountLeafName $
name : takeWhile (not . isDisplayed) parents name : takeWhile (not . isDisplayed) parents