1 files changed, 1 insertions, 1 deletions

diff --git a/lib/Postdelay/TimeSpec.hs b/lib/Postdelay/TimeSpec.hs
index 951b1c0..f61d84e 100644
--- a/lib/Postdelay/TimeSpec.hs
+++ b/lib/Postdelay/TimeSpec.hs
@@ -124,7 +124,7 @@ dateSpec = label "Date" $ (>> scribe (prio' Default . time) midnight) <$> choice
                      scribe (prio' Assign . date.days) 1
                  ]
            , try $ do
-               let daySuffix = optional $ choice [ string' "st", string' "nd", string' "rd", string' "th" ]
+               let daySuffix = optional $ choice [ string ".", string' "st", string' "nd", string' "rd", string' "th" ]
                (m, d) <- choice [ try $ (,) <$> monthName <* spaces <*> dayNumber False <* daySuffix
                                 , try $ flip (,) <$> dayNumber False <* daySuffix <* spaces <*> monthName
                                 ]