From 929f13ec037d87f3d940da6cb194d3b0810ab888 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Wed, 26 Jan 2022 09:00:40 -1000 Subject: [PATCH] fix: warning (#1799) --- hledger-lib/Hledger/Data/Dates.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/hledger-lib/Hledger/Data/Dates.hs b/hledger-lib/Hledger/Data/Dates.hs index 8b512e6b7..7870bde9a 100644 --- a/hledger-lib/Hledger/Data/Dates.hs +++ b/hledger-lib/Hledger/Data/Dates.hs @@ -538,7 +538,6 @@ startofmonth day = fromGregorian y m 1 where (y,m,_) = toGregorian day nthdayofmonth d day = fromGregorian y m d where (y,m,_) = toGregorian day thisquarter = startofquarter -nextquarter = startofquarter . addGregorianMonthsClip 3 startofquarter day = fromGregorian y (firstmonthofquarter m) 1 where (y,m,_) = toGregorian day