From 6094c84b7ae0e00d51c16e7e283ad2e589091bee Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sat, 11 Nov 2017 21:13:43 -0800 Subject: Functor instance to fix ghc 7.8 warning. --- src/Text/Pandoc/Lua/Filter.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Lua/Filter.hs b/src/Text/Pandoc/Lua/Filter.hs index 8db31e7fa..687ab2be5 100644 --- a/src/Text/Pandoc/Lua/Filter.hs +++ b/src/Text/Pandoc/Lua/Filter.hs @@ -103,7 +103,7 @@ walkMWithLuaFilter :: LuaFilter -> Pandoc -> Lua Pandoc walkMWithLuaFilter f = walkInlines f >=> walkBlocks f >=> walkMeta f >=> walkPandoc f -mconcatMapM :: Monad m => (a -> m [a]) -> [a] -> m [a] +mconcatMapM :: (Monad m, Functor m) => (a -> m [a]) -> [a] -> m [a] mconcatMapM f = fmap mconcat . mapM f hasOneOf :: LuaFilter -> [String] -> Bool -- cgit v1.2.3