Markdown writer: Avoid printing excess spaces at end if no notes/refs.
This commit is contained in:
parent
8011d079c8
commit
8894b1a030
1 changed files with 2 additions and 1 deletions
|
@ -102,7 +102,8 @@ pandocToMarkdown opts (Pandoc (Meta title authors date) blocks) = do
|
|||
then Just $ writerColumns opts
|
||||
else Nothing
|
||||
let main = render colwidth $ body <>
|
||||
blankline <> notes' <> blankline <> refs'
|
||||
(if isEmpty notes' then empty else blankline <> notes') <>
|
||||
(if isEmpty refs' then empty else blankline <> refs')
|
||||
let context = writerVariables opts ++
|
||||
[ ("toc", render colwidth toc)
|
||||
, ("body", main)
|
||||
|
|
Loading…
Reference in a new issue