aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/Textile.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-08-14 09:49:31 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2014-08-14 09:49:31 -0700
commite917bcc124b9e1a8f4ce046d4ad7e6f817631666 (patch)
tree34099a1fabccf74138c1360309beb123d72c5eea /src/Text/Pandoc/Writers/Textile.hs
parent8c1e0543d7b62d8d7a3322fdc1e283bcfa458552 (diff)
downloadpandoc-e917bcc124b9e1a8f4ce046d4ad7e6f817631666.tar.gz
Make `raw_tex` extension non-default for textile reader, writer.
Enable `raw_tex` extension in textile writer. Closes #1532.
Diffstat (limited to 'src/Text/Pandoc/Writers/Textile.hs')
-rw-r--r--src/Text/Pandoc/Writers/Textile.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Textile.hs b/src/Text/Pandoc/Writers/Textile.hs
index 3a6982a01..20cb5f6f7 100644
--- a/src/Text/Pandoc/Writers/Textile.hs
+++ b/src/Text/Pandoc/Writers/Textile.hs
@@ -404,8 +404,10 @@ inlineToTextile _ (Str str) = return $ escapeStringForTextile str
inlineToTextile _ (Math _ str) =
return $ "<span class=\"math\">" ++ escapeStringForXML str ++ "</math>"
-inlineToTextile _ (RawInline f str)
+inlineToTextile opts (RawInline f str)
| f == Format "html" || f == Format "textile" = return str
+ | (f == Format "latex" || f == Format "tex") &&
+ isEnabled Ext_raw_tex opts = return str
| otherwise = return ""
inlineToTextile _ (LineBreak) = return "\n"