diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-08 12:47:39 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-08 12:47:39 +0100 |
commit | bcfb77e2ab832d97b66e0bd06c35a9a13be437da (patch) | |
tree | 62185141a31c50195d0a8178b8579a9972591be7 /src | |
parent | b6e7bfaf1d9fdec88aa81d7c7fa7431358706002 (diff) | |
download | pandoc-bcfb77e2ab832d97b66e0bd06c35a9a13be437da.tar.gz |
Markdown writer: Avoid spurious blanklines at end of document...
after tables and list, for example.
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Writers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs index 782d0d085..ab986208d 100644 --- a/src/Text/Pandoc/Writers/Markdown.hs +++ b/src/Text/Pandoc/Writers/Markdown.hs @@ -214,7 +214,7 @@ pandocToMarkdown opts (Pandoc meta blocks) = do body <- blockListToMarkdown opts blocks' notesAndRefs' <- notesAndRefs opts let render' :: Doc -> String - render' = render colwidth + render' = render colwidth . chomp let main = render' $ body <> notesAndRefs' let context = defField "toc" (render' toc) $ defField "body" main |