aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2011-02-06 09:38:44 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2011-02-06 09:38:44 -0800
commitaec54899606bed2580394baa1369e58ede20fde8 (patch)
treea51511989bc46bb3f9429ea4b73ff1a0076566e1 /src/Text
parent8f408e4b7b24bfcf0f6a48522a2d77b0b878d34d (diff)
downloadpandoc-aec54899606bed2580394baa1369e58ede20fde8.tar.gz
Use us-ascii charset in HTML template if --ascii option.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Writers/HTML.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index f9a10f355..97c5dabea 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -178,6 +178,7 @@ inTemplate opts tit auths date toc body' newvars =
(case toc of
Just t -> [ ("toc", showHtmlFragment t)]
Nothing -> []) ++
+ [ ("ascii","true") | writerAscii opts ] ++
[ ("author", a) | a <- authors ]
in renderTemplate context $ writerTemplate opts