Change "showEndDates" formatting to yyyy-mm-dd in CompoundBalanceCommand

This commit is contained in:
Brian Wignall 2020-01-06 11:15:44 -05:00 committed by Simon Michael
parent e12b0a4f05
commit 24026d629a

View File

@ -18,7 +18,6 @@ import Data.Maybe
import qualified Data.Text as TS import qualified Data.Text as TS
import qualified Data.Text.Lazy as TL import qualified Data.Text.Lazy as TL
import Data.Time.Calendar import Data.Time.Calendar
import Data.Time.Format
import System.Console.CmdArgs.Explicit as C import System.Console.CmdArgs.Explicit as C
import Hledger.Read.CsvReader (CSV, printCSV) import Hledger.Read.CsvReader (CSV, printCSV)
import Lucid as L hiding (value_) import Lucid as L hiding (value_)
@ -250,7 +249,7 @@ showEndDates es = case es of
[e] -> showdate e [e] -> showdate e
[] -> "" [] -> ""
where where
showdate = formatTime defaultTimeLocale "%0C%y/%m/%d" showdate = show
-- | Run one subreport for a compound balance command in multi-column mode. -- | Run one subreport for a compound balance command in multi-column mode.
-- This returns a MultiBalanceReport. -- This returns a MultiBalanceReport.