1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
|
Description: use online LaTeXMathML.js by default
Author: Jonas Smedegaard <dr@jones.dk>
Last-Update: 2018-04-24
---
This patch header follows DEP-3: http://dep.debian.net/deps/dep3/
--- a/src/Text/Pandoc/Options.hs
+++ b/src/Text/Pandoc/Options.hs
@@ -104,7 +104,7 @@ defaultAbbrevs = Set.fromList
data EPUBVersion = EPUB2 | EPUB3 deriving (Eq, Show, Read, Data, Typeable, Generic)
data HTMLMathMethod = PlainMath
- | LaTeXMathML (Maybe String) -- url of LaTeXMathML.js
+ | LaTeXMathML String -- url of LaTeXMathML.js
| JsMath (Maybe String) -- url of jsMath load script
| GladTeX
| WebTeX String -- url of TeX->image script.
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -259,7 +259,7 @@ pandocToHtml opts (Pandoc meta blocks) =
notes <- footnoteSection opts (reverse (stNotes st))
let thebody = blocks' >> notes
let math = case writerHTMLMathMethod opts of
- LaTeXMathML (Just url) ->
+ LaTeXMathML url ->
H.script ! A.src (toValue url)
! A.type_ "text/javascript"
$ mempty
--- a/man/pandoc.1
+++ b/man/pandoc.1
@@ -1302,15 +1302,16 @@ Note that this option does not imply \f[
.RE
.TP
.B \f[C]\-m\f[] [\f[I]URL\f[]], \f[C]\-\-latexmathml\f[][\f[C]=\f[]\f[I]URL\f[]]
-\f[I]Deprecated.\f[] Use the LaTeXMathML script to display embedded TeX
+\f[I]Deprecated.\f[] Use LaTeXMathML to display embedded TeX
math in HTML output.
TeX math will be displayed between \f[C]$\f[] or \f[C]$$\f[] characters
and put in \f[C]<span>\f[] tags with class \f[C]LaTeX\f[].
The LaTeXMathML JavaScript will then change it to MathML.
Note that currently only Firefox and Safari (and select e\-book readers)
natively support MathML.
-To insert a link the \f[C]LaTeXMathML.js\f[] script, provide a
-\f[I]URL\f[].
+The \f[I]URL\f[] should point to the \f[C]LaTeXMathML.js\f[] load script.
+If a \f[I]URL\f[] is not provided, a link to LaTeXMathML.js at the
+Homepage of LaTeXMathML will be inserted.
.RS
.RE
.TP
--- a/src/Text/Pandoc/App.hs
+++ b/src/Text/Pandoc/App.hs
@@ -351,12 +351,6 @@ convertWithOpts opts = do
maybe return (addStringAsVariable "epub-cover-image")
(optEpubCoverImage opts)
>>=
- (\vars -> case optHTMLMathMethod opts of
- LaTeXMathML Nothing -> do
- s <- UTF8.toString <$> readDataFile "LaTeXMathML.js"
- return $ ("mathml-script", s) : vars
- _ -> return vars)
- >>=
(\vars -> if format == "dzslides"
then do
dztempl <- UTF8.toString <$> readDataFile
@@ -1396,7 +1390,10 @@ options =
(OptArg
(\arg opt -> do
deprecatedOption "--latexmathml, --asciimathml, -m" ""
- return opt { optHTMLMathMethod = LaTeXMathML arg })
+ let url' = case arg of
+ Just u -> u
+ Nothing -> "http://math.etsu.edu/LaTeXMathML/LaTeXMathML.js"
+ return opt { optHTMLMathMethod = LaTeXMathML url' })
"URL")
"" -- "Use LaTeXMathML script in html output"
|