slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix: warning (#1799)

Browse Source
This commit is contained in:
Simon Michael 2022-01-26 09:00:40 -10:00
parent 27b6e1d111
commit 929f13ec03
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
hledger-lib/Hledger/Data/Dates.hs
View File

@ -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 nthdayofmonth d day = fromGregorian y m d where (y,m,_) = toGregorian day
thisquarter = startofquarter thisquarter = startofquarter
nextquarter = startofquarter . addGregorianMonthsClip 3
startofquarter day = fromGregorian y (firstmonthofquarter m) 1 startofquarter day = fromGregorian y (firstmonthofquarter m) 1
where where
(y,m,_) = toGregorian day (y,m,_) = toGregorian day