From 0a8d212a097267cafc4cd5a64691b8e85aadb5c3 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sun, 30 Sep 2018 21:09:06 -0700
Subject: [PATCH] Text.Pandoc.Options: add writerPreferAscii to WriterOptions.

[API change]
---
 src/Text/Pandoc/Options.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/Text/Pandoc/Options.hs b/src/Text/Pandoc/Options.hs
index e5ca1764c..204060d70 100644
--- a/src/Text/Pandoc/Options.hs
+++ b/src/Text/Pandoc/Options.hs
@@ -194,6 +194,7 @@ data WriterOptions = WriterOptions
   , writerReferenceDoc      :: Maybe FilePath -- ^ Path to reference document if specified
   , writerReferenceLocation :: ReferenceLocation    -- ^ Location of footnotes and references for writing markdown
   , writerSyntaxMap         :: SyntaxMap
+  , writerPreferAscii       :: Bool           -- ^ Prefer ASCII representations of characters when possible
   } deriving (Show, Data, Typeable, Generic)
 
 instance Default WriterOptions where
@@ -228,6 +229,7 @@ instance Default WriterOptions where
                       , writerReferenceDoc     = Nothing
                       , writerReferenceLocation = EndOfDocument
                       , writerSyntaxMap        = defaultSyntaxMap
+                      , writerPreferAscii      = False
                       }
 
 instance HasSyntaxExtensions WriterOptions where