summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorDebian Haskell Group <pkg-haskell-maintainers@lists.alioth.debian.org>2018-04-24 11:43:06 -0700
committerSean Whitton <spwhitton@spwhitton.name>2018-04-24 11:43:06 -0700
commit92bcf6e4b806a013e1889453468f2ed5565c3044 (patch)
tree6d070cfff74188da01aa1dfc066e32db17631021 /src/Text/Pandoc/Writers
parent209b2bd368a7b9287a1878a91e0cde54333eee9d (diff)
_online_latexmathml_default
Gbp-Pq: Name 1001_online_latexmathml_default.patch
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/HTML.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index 1647df7ea..6b9c4339b 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -259,7 +259,7 @@ pandocToHtml opts (Pandoc meta blocks) = do
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