rendering a June 30 date span properly (#272)
30 days hath september, april, JUNE and november
This commit is contained in:
parent
b827f1a146
commit
cddaa2724d
@ -134,8 +134,8 @@ showDateSpan ds@(DateSpan (Just from) (Just to)) =
|
|||||||
,(2,[28,29])
|
,(2,[28,29])
|
||||||
,(3,[31])
|
,(3,[31])
|
||||||
,(4,[30])
|
,(4,[30])
|
||||||
,(5,[30])
|
,(5,[31])
|
||||||
,(6,[31])
|
,(6,[30])
|
||||||
,(7,[31])
|
,(7,[31])
|
||||||
,(8,[31])
|
,(8,[31])
|
||||||
,(9,[30])
|
,(9,[30])
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user