@@ -610,8 +610,8 @@ inlineToHtml opts inline =
610610 DisplayMath -> brtag >> m >> brtag
611611 GladTeX ->
612612 return $ case t of
613− InlineMath -> preEscapedString "<EQ ENV=\"math\">" >> toHtml str >> preEscapedString "</EQ>"
614− DisplayMath -> preEscapedString "<EQ ENV=\"displaymath\">" >> toHtml str >> preEscapedString "</EQ>"
613+ InlineMath -> preEscapedString $ "<EQ ENV=\"math\">" ++ str ++ "</EQ>"
614+ DisplayMath -> preEscapedString $ "<EQ ENV=\"displaymath\">" ++ str ++ "</EQ>"
615615 MathML _ -> do
616616 let dt = if t == InlineMath
617617 then DisplayInline