1e2f2bc4f6
+ Split template haskell functions into new module, Text.Pandoc.TH + Distinguish contentsOf and binaryContentsOf; the former uses text mode in Windows, while the latter uses binary mode git-svn-id: https://pandoc.googlecode.com/svn/trunk@1368 788f1e2b-df1e-0410-8736-df70ead52e1b
14 lines
611 B
Haskell
14 lines
611 B
Haskell
{-# LANGUAGE CPP, TemplateHaskell #-}
|
|
-- | Definitions for use of ASCIIMathML in HTML.
|
|
-- (See <http://www1.chapman.edu/~jipsen/mathml/asciimath.html>.)
|
|
module Text.Pandoc.ASCIIMathML ( asciiMathMLScript ) where
|
|
import Text.Pandoc.TH ( contentsOf )
|
|
import System.FilePath ( (</>) )
|
|
|
|
-- | String containing ASCIIMathML javascript.
|
|
asciiMathMLScript :: String
|
|
#ifndef __HADDOCK__
|
|
asciiMathMLScript = "<script type=\"text/javascript\">\n" ++
|
|
$(contentsOf $ "data" </> "ASCIIMathML.js.comment") ++
|
|
$(contentsOf $ "data" </> "ASCIIMathML.js.packed") ++ "</script>\n"
|
|
#endif
|