1 files changed, 1 insertions, 1 deletions

diff --git a/lib/Postdelay/Scan.hs b/lib/Postdelay/Scan.hs
index 0a265b4..7f80818 100644
--- a/lib/Postdelay/Scan.hs
+++ b/lib/Postdelay/Scan.hs
@@ -70,7 +70,7 @@ extractDelay (Message headers _) = do
       guard $ CI.mk field == "X-Timezone"
       either throwM return =<< runParserT (spaceConsumer *> lexeme timeZone <* eof) field content
     parseDelay :: Field -> m (Endo LocalTime)
-    parseDelay (OptionalField field content) = either throwM return =<< runParserT (spaceConsumer *> lexeme timeSpec <* eof) field content
+    parseDelay (OptionalField field content) = either throwM return =<< runParserT (spaceConsumer *> timeSpec <* eof) field content
 
 localT :: Either TimeZone TZ -> Iso' UTCTime LocalTime
 localT (Left tz) = iso (utcToLocalTime tz) (localTimeToUTC tz)