diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2016-11-19 05:57:33 -0500 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-01-25 17:07:39 +0100 |
| commit | 314a4c7296029753872164428667c63642762901 (patch) | |
| tree | 9b3b037da010c07db9a95fbfdb0a2e2c5fba66f5 /src/Text/Pandoc/Writers/Docx.hs | |
| parent | c9e67163fd08f7eb1ef18aed47d7fab4614653b6 (diff) | |
| download | pandoc-314a4c7296029753872164428667c63642762901.tar.gz | |
Remove readFileStrict.
We only used it once, and then immediately converted to lazy.
Diffstat (limited to 'src/Text/Pandoc/Writers/Docx.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/Docx.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Docx.hs b/src/Text/Pandoc/Writers/Docx.hs index 3f380a3ee..07041f189 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -232,7 +232,7 @@ writeDocxPure opts doc@(Pandoc meta _) = do utctime <- P.getCurrentTime distArchive <- P.getDefaultReferenceDocx datadir refArchive <- case writerReferenceDocx opts of - Just f -> liftM (toArchive . toLazy) $ P.readFileStrict f + Just f -> toArchive <$> P.readFileLazy f Nothing -> P.getDefaultReferenceDocx datadir parsedDoc <- parseXml refArchive distArchive "word/document.xml" |