summaryrefslogtreecommitdiff
path: root/Text/Pandoc/ASCIIMathML.hs
blob: 829779e41d9ce64f00775a9b314c32919732655f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
{-# 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.Shared ( 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