From 3a1a50a45fb4e2fe2f4f03297e2428ec51059ea9 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sat, 25 Feb 2017 13:34:46 +0100
Subject: Make `--ascii` work with DocBook output too.

---
 src/Text/Pandoc/App.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src')

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'
-- 
cgit v1.2.3