From 5b1883fcdfff7dfe2d6254cbc33227cb101f0f42 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 19 Jan 2018 12:45:51 -0800 Subject: [PATCH] bs/bse/cf/is: fix display of abbreviated name for December --- hledger-lib/Hledger/Data/Period.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hledger-lib/Hledger/Data/Period.hs b/hledger-lib/Hledger/Data/Period.hs index a9fc1048d..6cd7bdf99 100644 --- a/hledger-lib/Hledger/Data/Period.hs +++ b/hledger-lib/Hledger/Data/Period.hs @@ -147,7 +147,7 @@ showPeriod PeriodAll = "-" -- | Like showPeriod, but if it's a month period show just -- the 3 letter month name abbreviation for the current locale. showPeriodMonthAbbrev (MonthPeriod _ m) -- Jan - | m >= 0 && m < length monthnames = snd $ monthnames !! (m-1) + | m > 0 && m <= length monthnames = snd $ monthnames !! (m-1) where monthnames = months defaultTimeLocale showPeriodMonthAbbrev p = showPeriod p