Use liftM since otherwise Functor type constraint needen in ghc 7.8.
commit17defd5004cec576a1b481b76c59545067e68663
authorJohn MacFarlane <jgm@berkeley.edu>
dateFri 15 Jul 2016, 11:59 (10 years ago)
parent2f54de7
src/Text/Pandoc/Parsing.hs+1−1
@@ -871,7 +871,7 @@ readWithM :: (Monad m)
871871 -> String -- ^ input
872872 -> m (Either PandocError a)
873873readWithM parser state input =
874− mapLeft (ParsecError input) <$> runParserT parser state "source" input
874+ mapLeft (ParsecError input) `liftM` runParserT parser state "source" input
875875
876876
877877-- | Parse a string with a given parser and state