From 7d60c798bf12a93ca4d7f4d973c917ba0d5a96ff Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Mon, 16 Jun 2014 23:02:20 -0700 Subject: Fixed compiler warning. --- src/Text/Pandoc/Readers/Docx.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Readers/Docx.hs') diff --git a/src/Text/Pandoc/Readers/Docx.hs b/src/Text/Pandoc/Readers/Docx.hs index df4be41ff..4035cde99 100644 --- a/src/Text/Pandoc/Readers/Docx.hs +++ b/src/Text/Pandoc/Readers/Docx.hs @@ -216,7 +216,9 @@ parPartsToInlines opts docx parparts = -- We're going to skip data-uri's for now. It should be an option, -- not mandatory. -- - --bottomUp (makeImagesSelfContained docx) $ + (if False -- TODO depend on option + then bottomUp (makeImagesSelfContained docx) + else id) $ bottomUp spanCorrect $ bottomUp spanTrim $ bottomUp spanReduce $ -- cgit v1.2.3