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

2020-06-13 22:21:14 +10:00 · 2020-06-13 22:21:14 +10:00 · cd41404fd4
commit cd41404fd4
parent 6467c252c7
1 changed files with 1 additions and 1 deletions
--- a/hledger-lib/Hledger/Reports/MultiBalanceReport.hs
+++ b/hledger-lib/Hledger/Reports/MultiBalanceReport.hs
@ -348,7 +348,7 @@ displayedAccounts ropts q valuedaccts =
    displayedName name
        | depth == 0  = DisplayName "..." "..." 0
        | tree_ ropts = treeDisplayName name
-        | otherwise   = flatDisplayName name
+        | otherwise   = DisplayName name (accountNameDrop (drop_ ropts) name) 0
      where
        elided = accountNameFromComponents . reverse . map accountLeafName $
            name : takeWhile (not . isDisplayed) parents