aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-12-02 16:49:11 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-12-02 16:49:11 +0000
commit3dc0a9141c2e56e619d3da15d0d7859098a38cde (patch)
tree7146d63b5a52dfe5c8db6ef9e611f57d268e9a2a
parentaf2ea8647b5cde2fc7928e186ffa0ce885dae0e2 (diff)
downloadpandoc-3dc0a9141c2e56e619d3da15d0d7859098a38cde.tar.gz
If gladtex specified, don't prettyprint <EQ> tags, or gladtex gets confused.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1136 788f1e2b-df1e-0410-8736-df70ead52e1b
-rw-r--r--Text/Pandoc/Writers/HTML.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Writers/HTML.hs b/Text/Pandoc/Writers/HTML.hs
index dfc8f219d..660bf652e 100644
--- a/Text/Pandoc/Writers/HTML.hs
+++ b/Text/Pandoc/Writers/HTML.hs
@@ -409,7 +409,7 @@ inlineToHtml opts inline =
return $ image ! [src (url ++ "?" ++ str),
alt str, title str]
GladTeX ->
- return $ tag "eq" << str
+ return $ primHtml $ "<EQ>" ++ str ++ "</EQ>"
PlainMath ->
inlineListToHtml opts (readTeXMath str) >>=
return . (thespan ! [theclass "math"]))