mirror of
https://github.com/simonmichael/hledger.git
synced 2024-12-28 04:46:31 +03:00
stop forcing tree mode for now, need is unclear (fixes #552)
This commit is contained in:
parent
a5b545c4eb
commit
6c95909fa2
@ -168,16 +168,6 @@ balanceviewReport BalanceView{..} CliOpts{command_=cmd, reportopts_=ropts, rawop
|
||||
PeriodChange -> "(Balance Changes)"
|
||||
CumulativeChange -> "(Cumulative Ending Balances)"
|
||||
HistoricalBalance -> "(Historical Ending Balances)"
|
||||
ropts' = treeIfNotPeriod $
|
||||
ropts { balancetype_ = balancetype }
|
||||
treeIfNotPeriod = case (balancetype, interval_ ropts) of
|
||||
-- For --historical/--cumulative, we must use multiBalanceReport.
|
||||
-- (This forces --no-elide.)
|
||||
-- These settings format the output in a way that we can convert to
|
||||
-- a normal balance report using singleBalanceReport. See
|
||||
-- Balance.hs for more information.
|
||||
(HistoricalBalance, NoInterval) -> \o -> o { accountlistmode_ = ALTree }
|
||||
(CumulativeChange , NoInterval) -> \o -> o { accountlistmode_ = ALTree }
|
||||
_ -> id
|
||||
ropts' = ropts { balancetype_ = balancetype }
|
||||
merging (Table hLeft hTop dat) (Table hLeft' _ dat') =
|
||||
Table (T.Group DoubleLine [hLeft, hLeft']) hTop (dat ++ dat')
|
||||
|
Loading…
Reference in New Issue
Block a user