diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/HTML.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 2f58c7614..a32d63eaf 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -105,9 +105,7 @@ pandocToHtml opts (Pandoc (Meta title' authors' date') blocks) = do blocks' <- liftM toHtmlFromList $ mapM (elementToHtml opts) sects st <- get let notes = reverse (stNotes st) - let before = primHtml $ writerIncludeBefore opts - let after = primHtml $ writerIncludeAfter opts - let thebody = before +++ blocks' +++ footnoteSection notes +++ after + let thebody = blocks' +++ footnoteSection notes let math = if stMath st then case writerHTMLMathMethod opts of LaTeXMathML (Just url) -> |