From 3dc0a9141c2e56e619d3da15d0d7859098a38cde Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Sun, 2 Dec 2007 16:49:11 +0000
Subject: 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
---
 Text/Pandoc/Writers/HTML.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Text/Pandoc/Writers')

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"])) 
-- 
cgit v1.2.3