Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Fixed up LaTeXMathML module not to use TH.

Browse source 
Instead, we read the script in pandoc.hs, and pass it via variables.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1702 788f1e2b-df1e-0410-8736-df70ead52e1b
This commit is contained in:
fiddlosopher 2009-12-31 01:13:16 +00:00
parent b7750b705a
commit f36ce015c4
4 changed files with 19 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Text/Pandoc/LaTeXMathML.hs
View file

@ -6,11 +6,8 @@ import Text.Pandoc.Shared (readDataFile)
-- | String containing LaTeXMathML javascript.
latexMathMLScript :: IO String
latexMathMLScript = undefined
{-
latexMathMLScript = do
jsCom <- readDataFile $ "data" </> "LaTeXMathML.js.comment"
jsPacked <- readDataFile $ "data" </> "LaTeXMathML.js.packed"
return $ "<script type=\"text/javascript\">\n" ++ jsCom ++ jsPacked ++
"</script>\n"
-}

13
src/pandoc.hs
View file

@ -34,6 +34,7 @@ import Text.Pandoc
import Text.Pandoc.ODT
import Text.Pandoc.Writers.S5 (s5HeaderIncludes)
import Text.Pandoc.Templates (getDefaultTemplate)
import Text.Pandoc.LaTeXMathML (latexMathMLScript)
import Text.Pandoc.Shared ( HTMLMathMethod (..), tabFilter, ObfuscationMethod (..) )
#ifdef _HIGHLIGHTING
import Text.Pandoc.Highlighting ( languages )
@ -261,8 +262,8 @@ options =
, Option "m" ["latexmathml", "asciimathml"]
(OptArg
(\arg opt -> return opt { optHTMLMathMethod =
LaTeXMathML arg })
(\arg opt ->
return opt { optHTMLMathMethod = LaTeXMathML arg })
"URL")
"" -- "Use LaTeXMathML script in html output"
@ -641,6 +642,12 @@ main = do
variables
else return variables
variables'' <- case mathMethod of
LaTeXMathML (Just _) -> do
s <- latexMathMLScript
return $ ("latexmathml-script", s) : variables'
_ -> return variables'
let startParserState =
defaultParserState { stateParseRaw = parseRaw,
stateTabStop = tabStop,
@ -660,7 +667,7 @@ main = do
writerTemplate = if null template
then defaultTemplate
else template,
writerVariables = variables',
writerVariables = variables'',
writerIncludeBefore = concat befores,
writerIncludeAfter = concat afters,
writerTabStop = tabStop,

8
templates/html.template
View file

@ -7,7 +7,13 @@
/><meta name="generator" content="pandoc"
/><meta name="author" content="$authors$"
/><meta name="date" content="$date$"
/>$header-includes$
/>
$if(latexmathml-script)$
$latexmathml-script$
$endif$
$if(header-includes)$
$header-includes$
$endif$
</head
><body
>

2
templates/latex.template
View file

@ -33,7 +33,9 @@ $if(numbersections)$
$else$
\setcounter{secnumdepth}{0}
$endif$
$if(header-includes)$
$header-includes$
$endif$
$if(title)$
\title{$title$}