diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-08-10 23:04:14 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-08-10 23:04:14 -0700 |
| commit | 6aaf8f4770916fcef433d0078502d674a1c97fc7 (patch) | |
| tree | 047b72916bbd49414b9d316c0ef71b772fb45860 /src/Text/Pandoc/Writers/Docx.hs | |
| parent | ed4f6b348a7a53900dbddadc6681bc7561661f36 (diff) | |
Expose getDefaultDataFile in both Shared and Class.
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 fb6b2013a..a60056845 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -231,7 +231,7 @@ writeDocx opts doc@(Pandoc meta _) = do username <- P.lookupEnv "USERNAME" utctime <- P.getCurrentTime distArchive <- (toArchive . BL.fromStrict) <$> - P.readDataFile Nothing "reference.docx" + P.readDefaultDataFile "reference.docx" refArchive <- case writerReferenceDoc opts of Just f -> toArchive <$> P.readFileLazy f Nothing -> (toArchive . BL.fromStrict) <$> |