From 17defd5004cec576a1b481b76c59545067e68663 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 15 Jul 2016 11:59:06 -0700 Subject: Use liftM since otherwise Functor type constraint needen in ghc 7.8. --- src/Text/Pandoc/Parsing.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs index 59aae060b..f248b2514 100644 --- a/src/Text/Pandoc/Parsing.hs +++ b/src/Text/Pandoc/Parsing.hs @@ -871,7 +871,7 @@ readWithM :: (Monad m) -> String -- ^ input -> m (Either PandocError a) readWithM parser state input = - mapLeft (ParsecError input) <$> runParserT parser state "source" input + mapLeft (ParsecError input) `liftM` runParserT parser state "source" input -- | Parse a string with a given parser and state -- cgit v1.2.3