From 2c3310a592e33bf4bd4e4a1328efda0d1b6ac218 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 19 Dec 2014 16:13:38 -0800 Subject: Added Text.Pandoc.Compat.Locale to assist with transition to time 1.5. --- src/Text/Pandoc/Readers/Txt2Tags.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/Text/Pandoc/Readers') diff --git a/src/Text/Pandoc/Readers/Txt2Tags.hs b/src/Text/Pandoc/Readers/Txt2Tags.hs index 6f8c19ac7..834d18c5c 100644 --- a/src/Text/Pandoc/Readers/Txt2Tags.hs +++ b/src/Text/Pandoc/Readers/Txt2Tags.hs @@ -52,7 +52,7 @@ import Control.Monad.Reader (Reader, runReader, asks) import Data.Time.LocalTime (getZonedTime) import Text.Pandoc.Compat.Directory(getModificationTime) import Data.Time.Format (formatTime) -import System.Locale (defaultTimeLocale) +import Text.Pandoc.Compat.Locale (defaultTimeLocale) import System.IO.Error (catchIOError) type T2T = ParserT String ParserState (Reader T2TMeta) @@ -576,4 +576,3 @@ atStart = (sourceColumn <$> getPosition) >>= guard . (== 1) ignoreSpacesCap :: T2T String -> T2T String ignoreSpacesCap p = map toLower <$> (spaces *> p <* spaces) - -- cgit v1.2.3