From ff6394171be99c369e1755cc585151a78f086509 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Mon, 8 Apr 2013 09:51:10 -0700 Subject: Markdown writer: Put multiple authors on separate lines in titleblock. Also, don't wrap long author entries, as new lines get treated as new authors. --- src/Text/Pandoc/Writers/Markdown.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs index f0d3fc0af..b4d39a2d5 100644 --- a/src/Text/Pandoc/Writers/Markdown.hs +++ b/src/Text/Pandoc/Writers/Markdown.hs @@ -93,7 +93,7 @@ plainify = bottomUp go pandocTitleBlock :: Doc -> [Doc] -> Doc -> Doc pandocTitleBlock tit auths dat = hang 2 (text "% ") tit <> cr <> - hang 2 (text "% ") (hcat (intersperse (text "; ") auths)) <> cr <> + hang 2 (text "% ") (vcat $ map nowrap auths) <> cr <> hang 2 (text "% ") dat <> cr mmdTitleBlock :: Doc -> [Doc] -> Doc -> Doc -- cgit v1.2.3