diff options
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 8 |
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 |