summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/LaTeXMathML.hs
blob: 020d626c03d34c5bfbcd33d408a43b816060e339 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
-- | Definitions for use of LaTeXMathML in HTML.  
-- (See <http://math.etsu.edu/LaTeXMathML/>)
module Text.Pandoc.LaTeXMathML ( latexMathMLScript ) where
import System.FilePath ( (</>) )
import Text.Pandoc.Shared (readDataFile)

-- | String containing LaTeXMathML javascript.
latexMathMLScript :: IO String
latexMathMLScript = do
 jsCom <- readDataFile $ "data" </> "LaTeXMathML.js.comment"
 jsPacked <- readDataFile $ "data" </> "LaTeXMathML.js.packed"
 return $ "<script type=\"text/javascript\">\n" ++ jsCom ++ jsPacked ++
          "</script>\n"