mirror of
https://github.com/simonmichael/hledger.git
synced 2024-10-04 01:50:50 +03:00
cli: Commands.Balance.budgetReportAsCsv, budgetReportAsSpreadsheet: remove duplicate transposition
This commit is contained in:
parent
3fbad1892d
commit
2d59bc8591
@ -1189,16 +1189,12 @@ budgetReportAsTable ReportOpts{..} (PeriodicReport spans items totrow) =
|
||||
-- but includes alternating actual and budget amount columns.
|
||||
budgetReportAsCsv :: ReportOpts -> BudgetReport -> [[Text]]
|
||||
budgetReportAsCsv ropts report
|
||||
= (if transpose_ ropts then transpose else id) $
|
||||
map (map Ods.cellContent) $
|
||||
= map (map Ods.cellContent) $
|
||||
budgetReportAsSpreadsheetHelper ropts report
|
||||
|
||||
budgetReportAsSpreadsheet :: ReportOpts -> BudgetReport -> [[Ods.Cell Text]]
|
||||
budgetReportAsSpreadsheet ropts report
|
||||
= (if transpose_ ropts
|
||||
then error' "Sorry, --transpose with FODS or HTML output is not yet supported" -- PARTIAL:
|
||||
else id)
|
||||
budgetReportAsSpreadsheetHelper ropts report
|
||||
= budgetReportAsSpreadsheetHelper ropts report
|
||||
|
||||
budgetReportAsSpreadsheetHelper :: ReportOpts -> BudgetReport -> [[Ods.Cell Text]]
|
||||
budgetReportAsSpreadsheetHelper
|
||||
|
Loading…
Reference in New Issue
Block a user