@@ -213,8 +213,12 @@ writeDocx opts doc@(Pandoc meta _) = do
213213 let doc' = walk fixDisplayMath doc
214214 username <- P.lookupEnv "USERNAME"
215215 utctime <- P.getCurrentTime
216− distArchive <- (toArchive . BL.fromStrict) <$>
217− P.readDefaultDataFile "reference.docx"
216+ distArchive <- (toArchive . BL.fromStrict) <$> do
217+ oldUserDataDir <- P.getUserDataDir
218+ P.setUserDataDir Nothing
219+ res <- P.readDefaultDataFile "reference.docx"
220+ P.setUserDataDir oldUserDataDir
221+ return res
218222 refArchive <- case writerReferenceDoc opts of
219223 Just f -> toArchive <$> P.readFileLazy f
220224 Nothing -> (toArchive . BL.fromStrict) <$>