diff options
author | John MacFarlane <jgm@berkeley.edu> | 2014-07-19 17:18:35 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-07-19 17:18:35 -0700 |
commit | a7b64532f54725ebc20f066295307389b8b4cbe0 (patch) | |
tree | 83ace6cd007e1e891b3010f6b836350c0d90eadc /src/Text/Pandoc/Writers/HTML.hs | |
parent | 999b952a212af0e33183068ff4a55edc5aafde62 (diff) | |
parent | e7d8039969fd177da91b871f3bc4b73950cc7bc8 (diff) | |
download | pandoc-a7b64532f54725ebc20f066295307389b8b4cbe0.tar.gz |
Merge pull request #1438 from mpickering/master
Renamed readTeXMath' to avoid name conflict with texmath 0.6.7
Diffstat (limited to 'src/Text/Pandoc/Writers/HTML.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 3f4c19b67..4cd21ff4c 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -704,14 +704,14 @@ inlineToHtml opts inline = Right r -> return $ preEscapedString $ ppcElement conf r Left _ -> inlineListToHtml opts - (readTeXMath' t str) >>= return . + (texMathToInlines t str) >>= return . (H.span ! A.class_ "math") MathJax _ -> return $ H.span ! A.class_ "math" $ toHtml $ case t of InlineMath -> "\\(" ++ str ++ "\\)" DisplayMath -> "\\[" ++ str ++ "\\]" PlainMath -> do - x <- inlineListToHtml opts (readTeXMath' t str) + x <- inlineListToHtml opts (texMathToInlines t str) let m = H.span ! A.class_ "math" $ x let brtag = if writerHtml5 opts then H5.br else H.br return $ case t of |