aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Docx
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-10-28 09:56:20 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2017-10-28 09:56:20 -0700
commit47e2719cc3e18a6216c886b8ab7166f48bfe457f (patch)
treeeba2f39cd7ab1c8bc018321cecc342b0ae43c488 /src/Text/Pandoc/Readers/Docx
parentb39f782c8d333eda8c7560eea9e8468e04676321 (diff)
downloadpandoc-47e2719cc3e18a6216c886b8ab7166f48bfe457f.tar.gz
Fix warning for older GHC versions.
Diffstat (limited to 'src/Text/Pandoc/Readers/Docx')
-rw-r--r--src/Text/Pandoc/Readers/Docx/Parse.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Docx/Parse.hs b/src/Text/Pandoc/Readers/Docx/Parse.hs
index fea595027..99e6f99e6 100644
--- a/src/Text/Pandoc/Readers/Docx/Parse.hs
+++ b/src/Text/Pandoc/Readers/Docx/Parse.hs
@@ -106,7 +106,7 @@ eitherToD (Right b) = return b
eitherToD (Left _) = throwError DocxError
concatMapM :: (Monad m) => (a -> m [b]) -> [a] -> m [b]
-concatMapM f xs = fmap concat (mapM f xs)
+concatMapM f xs = liftM concat (mapM f xs)
-- This is similar to `mapMaybe`: it maps a function returning the D