aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Writers/HTML.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index 9bc75296d..d33dcff27 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -465,9 +465,11 @@ inlineToHtml opts inline =
case texMathToMathML dt str of
Right r -> return $ primHtml $
ppcElement conf r
- Left _ -> inlineToHtml opts
- (Math t str)
- PlainMath ->
+ Left _ -> inlineListToHtml opts
+ (readTeXMath str) >>=
+ return . (thespan !
+ [theclass "math"])
+ PlainMath ->
inlineListToHtml opts (readTeXMath str) >>=
return . (thespan ! [theclass "math"]) )
(TeX str) -> case writerHTMLMathMethod opts of