aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-02-25 13:34:46 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-02-25 13:35:34 +0100
commit3a1a50a45fb4e2fe2f4f03297e2428ec51059ea9 (patch)
tree6605757c55f6123e34151cbf95d618bb0bb9e31d /src/Text/Pandoc
parent7d0082aa0b631592f38fc9436a3d0dd5426653cf (diff)
downloadpandoc-3a1a50a45fb4e2fe2f4f03297e2428ec51059ea9.tar.gz
Make `--ascii` work with DocBook output too.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/App.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Text/Pandoc/App.hs b/src/Text/Pandoc/App.hs
index e84e5a136..1a41050d7 100644
--- a/src/Text/Pandoc/App.hs
+++ b/src/Text/Pandoc/App.hs
@@ -411,7 +411,10 @@ convertWithOpts opts = do
selfcontain = if optSelfContained opts && htmlFormat
then makeSelfContained writerOptions
else return
- handleEntities = if htmlFormat && optAscii opts
+ handleEntities = if (htmlFormat ||
+ format == "docbook4" ||
+ format == "docbook5" ||
+ format == "docbook") && optAscii opts
then toEntities
else id
output <- f writerOptions doc'