HTML writer: fixed error in Math writer that caused infinite loop.

This commit is contained in:
John MacFarlane 2010-03-21 22:48:47 -07:00
parent 9cc54751ec
commit 483a591eba

View file

@ -465,8 +465,10 @@ inlineToHtml opts inline =
case texMathToMathML dt str of
Right r -> return $ primHtml $
ppcElement conf r
Left _ -> inlineToHtml opts
(Math t str)
Left _ -> inlineListToHtml opts
(readTeXMath str) >>=
return . (thespan !
[theclass "math"])
PlainMath ->
inlineListToHtml opts (readTeXMath str) >>=
return . (thespan ! [theclass "math"]) )