balance: support --drop in flat multicolumn reports
This commit is contained in:
parent
f9c1d94b5f
commit
efad3a767d
@ -388,7 +388,7 @@ periodBalanceReportAsText opts (MultiBalanceReport (colspans, items, coltotals))
|
|||||||
accts = map renderacct items'
|
accts = map renderacct items'
|
||||||
renderacct ((a,a',i),_)
|
renderacct ((a,a',i),_)
|
||||||
| tree_ opts = replicate (i*2) ' ' ++ a'
|
| tree_ opts = replicate (i*2) ' ' ++ a'
|
||||||
| otherwise = a
|
| otherwise = accountNameDrop (drop_ opts) a
|
||||||
acctswidth = maximum $ map length $ accts
|
acctswidth = maximum $ map length $ accts
|
||||||
totalrow | no_total_ opts = row "" []
|
totalrow | no_total_ opts = row "" []
|
||||||
| otherwise = row "" coltotals
|
| otherwise = row "" coltotals
|
||||||
@ -409,7 +409,7 @@ cumulativeBalanceReportAsText opts (MultiBalanceReport (colspans, items, coltota
|
|||||||
accts = map renderacct items
|
accts = map renderacct items
|
||||||
renderacct ((a,a',i),_)
|
renderacct ((a,a',i),_)
|
||||||
| tree_ opts = replicate (i*2) ' ' ++ a'
|
| tree_ opts = replicate (i*2) ' ' ++ a'
|
||||||
| otherwise = a
|
| otherwise = accountNameDrop (drop_ opts) a
|
||||||
acctswidth = maximum $ map length $ accts
|
acctswidth = maximum $ map length $ accts
|
||||||
addtotalrow | no_total_ opts = id
|
addtotalrow | no_total_ opts = id
|
||||||
| otherwise = (+----+ row "" coltotals)
|
| otherwise = (+----+ row "" coltotals)
|
||||||
@ -430,7 +430,7 @@ historicalBalanceReportAsText opts (MultiBalanceReport (colspans, items, coltota
|
|||||||
accts = map renderacct items
|
accts = map renderacct items
|
||||||
renderacct ((a,a',i),_)
|
renderacct ((a,a',i),_)
|
||||||
| tree_ opts = replicate (i*2) ' ' ++ a'
|
| tree_ opts = replicate (i*2) ' ' ++ a'
|
||||||
| otherwise = a
|
| otherwise = accountNameDrop (drop_ opts) a
|
||||||
acctswidth = maximum $ map length $ accts
|
acctswidth = maximum $ map length $ accts
|
||||||
addtotalrow | no_total_ opts = id
|
addtotalrow | no_total_ opts = id
|
||||||
| otherwise = (+----+ row "" coltotals)
|
| otherwise = (+----+ row "" coltotals)
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user