b98049e · typeable/pandoc

git.iko.soy/typeable/pandoc

Made markdown writer sensitive to Ext_pandoc_title_blocks.

commitb98049ee6c126fb6a6834e0525b37430490131dd authorJohn MacFarlane <jgm@berkeley.edu> dateThu 2 Aug 2012, 21:03 (14 years ago) parent1d7fd80

1 file changed+2−1

unifiedsplit

src/Text/Pandoc/Writers/Markdown.hs+2−1

@@ -91,7 +91,8 @@ pandocToMarkdown opts (Pandoc (Meta title authors date) blocks) = do

9191 title' <- inlineListToMarkdown opts title

9292 authors' <- mapM (inlineListToMarkdown opts) authors

9393 date' <- inlineListToMarkdown opts date

94− let titleblock = not $ null title && null authors && null date

94+ let titleblock = isEnabled Ext_pandoc_title_blocks opts &&

95+ not (null title && null authors && null date)

9596 let headerBlocks = filter isHeaderBlock blocks

9697 let toc = if writerTableOfContents opts

9798 then tableOfContents opts headerBlocks