lee/pandoc
1
0
Fork 0
mirror of https://github.com/jgm/pandoc.git synced 2026-09-27 09:55:57 +00:00
Code Issues Packages Projects Releases Wiki Activity

DOCX writer: Look in user data dir for archive reference.docx.

Browse Source
This commit is contained in:
John MacFarlane
2014-10-21 14:33:15 -07:00
parent 78bdc08de7
commit e4f3475eaa
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Text/Pandoc/Writers/Docx.hs
+1 -1
View File
@@ -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)