aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhilip Pesca <phil.pesca@gmail.com>2019-07-23 12:21:32 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2019-07-23 12:21:31 -0700
commitbc508534a648b900c683e60b1cc9681ed606a723 (patch)
tree99e6aca4fb752472e7cb9964ddcb40358bdea69c
parentdb5f6dd4fe6e17dc67719f85847f569839cd3169 (diff)
downloadpandoc-bc508534a648b900c683e60b1cc9681ed606a723.tar.gz
HTML writer: render inline formulas correctly with --webtex (#5656)
We add `\textstyle` to the beginning of the formula to ensure it will be rendered in inline style. Closes #5655.
-rw-r--r--src/Text/Pandoc/Writers/HTML.hs5
-rw-r--r--test/command/5655.md14
2 files changed, 18 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index a0f6f17f0..84fd404b1 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -1062,8 +1062,11 @@ inlineToHtml opts inline = do
case writerHTMLMathMethod opts of
WebTeX url -> do
let imtag = if html5 then H5.img else H.img
+ let s = case t of
+ InlineMath -> "\\textstyle "
+ DisplayMath -> ""
let m = imtag ! A.style "vertical-align:middle"
- ! A.src (toValue $ url ++ urlEncode str)
+ ! A.src (toValue $ url ++ urlEncode (s ++ str))
! A.alt (toValue str)
! A.title (toValue str)
let brtag = if html5 then H5.br else H.br
diff --git a/test/command/5655.md b/test/command/5655.md
new file mode 100644
index 000000000..de5a923ae
--- /dev/null
+++ b/test/command/5655.md
@@ -0,0 +1,14 @@
+````
+% pandoc --webtex
+$T_n={n+1 \choose 2}$
+^D
+<p><img style="vertical-align:middle" src="https://latex.codecogs.com/png.latex?%5Ctextstyle%20T_n%3D%7Bn%2B1%20%5Cchoose%202%7D" alt="T_n={n+1 \choose 2}" title="T_n={n+1 \choose 2}" /></p>
+````
+
+````
+% pandoc --webtex
+$$T_n={n+1 \choose 2}$$
+^D
+<p><br /><img style="vertical-align:middle" src="https://latex.codecogs.com/png.latex?T_n%3D%7Bn%2B1%20%5Cchoose%202%7D" alt="T_n={n+1 \choose 2}" title="T_n={n+1 \choose 2}" /><br /></p>
+````
+