diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2014-10-21 14:33:15 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2014-10-21 14:33:15 -0700 |
| commit | e4f3475eaa2e1f6e55a76291ead555bb09f20f93 (patch) | |
| tree | 7154df878856f0cd759ebc818f69a51fda0d01db | |
| parent | 78bdc08de7191e81c198832b4dd62de15c549027 (diff) | |
| download | pandoc-e4f3475eaa2e1f6e55a76291ead555bb09f20f93.tar.gz | |
DOCX writer: Look in user data dir for archive reference.docx.
| -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 45ac90e45..8740e7cef 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -183,7 +183,7 @@ writeDocx opts doc@(Pandoc meta _) = do case writerReferenceDocx opts of Just f -> B.readFile f Nothing -> readDataFile datadir "reference.docx" - distArchive <- liftM (toArchive . toLazy) $ readDataFile Nothing "reference.docx" + distArchive <- liftM (toArchive . toLazy) $ readDataFile datadir "reference.docx" parsedDoc <- parseXml refArchive distArchive "word/document.xml" let wname f qn = qPrefix qn == Just "w" && f (qName qn) |