rendering a June 30 date span properly (#272)

30 days hath september, april, JUNE and november
This commit is contained in:
Simon Michael 2015-07-02 20:44:39 -07:00
parent b827f1a146
commit cddaa2724d

View File

@ -134,8 +134,8 @@ showDateSpan ds@(DateSpan (Just from) (Just to)) =
,(2,[28,29])
,(3,[31])
,(4,[30])
,(5,[30])
,(6,[31])
,(5,[31])
,(6,[30])
,(7,[31])
,(8,[31])
,(9,[30])