From 3b6d7afa717ec933df096be8dc5c484657ca619f Mon Sep 17 00:00:00 2001 From: mpickering Date: Thu, 21 Aug 2014 17:11:16 +0100 Subject: Txt2Tags Reader: Corrected formatting of %%mtime macro --- src/Text/Pandoc/Readers/Txt2Tags.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Text/Pandoc/Readers/Txt2Tags.hs b/src/Text/Pandoc/Readers/Txt2Tags.hs index 8391c6062..c3a46a7f9 100644 --- a/src/Text/Pandoc/Readers/Txt2Tags.hs +++ b/src/Text/Pandoc/Readers/Txt2Tags.hs @@ -73,7 +73,7 @@ instance Default T2TMeta where getT2TMeta :: [FilePath] -> FilePath -> IO T2TMeta getT2TMeta inps out = do curDate <- formatTime defaultTimeLocale "%F" <$> getZonedTime - let getModTime = fmap (formatTime defaultTimeLocale "%F") . + let getModTime = fmap (formatTime defaultTimeLocale "%T") . getModificationTime curMtime <- catchIOError (maximum <$> mapM getModTime inps) -- cgit v1.2.3