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