From 1347885cd81d9eb57d45c52f5418bf64191d87a0 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Wed, 28 Mar 2018 18:17:20 +0100 Subject: [PATCH] bal/bs/bse/cf/is: show short monthnames in monthly reports (like html) --- hledger/Hledger/Cli/Commands/Balance.hs | 2 +- hledger/Hledger/Cli/CompoundBalanceCommand.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger/Hledger/Cli/Commands/Balance.hs b/hledger/Hledger/Cli/Commands/Balance.hs index 8c4db5f70..c764f8efc 100644 --- a/hledger/Hledger/Cli/Commands/Balance.hs +++ b/hledger/Hledger/Cli/Commands/Balance.hs @@ -724,7 +724,7 @@ balanceReportAsTable opts (MultiBalanceReport (colspans, items, (coltotals,tot,a (map rowvals items) where mkDate = case balancetype_ opts of - PeriodChange -> showDateSpan + PeriodChange -> showDateSpanMonthAbbrev _ -> maybe "" (showDate . prevday) . spanEnd colheadings = map mkDate colspans ++ (if row_total_ opts then [" Total"] else []) diff --git a/hledger/Hledger/Cli/CompoundBalanceCommand.hs b/hledger/Hledger/Cli/CompoundBalanceCommand.hs index 18a0476d3..2a561b04d 100644 --- a/hledger/Hledger/Cli/CompoundBalanceCommand.hs +++ b/hledger/Hledger/Cli/CompoundBalanceCommand.hs @@ -294,7 +294,7 @@ compoundBalanceReportAsCsv ropts (title, colspans, subreports, (coltotals, grand addtotals $ padRow title : ("Account" : - map showDateSpan colspans + map showDateSpanMonthAbbrev colspans ++ (if row_total_ ropts then ["Total"] else []) ++ (if average_ ropts then ["Average"] else []) ) :