Fix spurious dots in markdown_mmd metadata output
Closes #6133 (regression).
commit114d77c2abac17d3e4676bb654f54535e0b809c9
authorJohn MacFarlane <jgm@berkeley.edu>
dateMon 10 Feb 2020, 08:59 (7 years ago)
parent689cb71
src/Text/Pandoc/Writers/Markdown.hs+1−1
@@ -125,7 +125,7 @@ mmdTitleBlock (Context hashmap) =
125125 (k', SimpleVal x)
126126 | isEmpty x -> empty
127127 | otherwise -> k' <> ":" <> space <>
128− nest 2 (chomp (removeBlankLines x))
128+ nest 2 (removeBlankLines (chomp x))
129129 _ -> empty
130130 removeBlankLines BlankLines{} = cr <> text "." <> cr
131131 removeBlankLines (Concat x y) = removeBlankLines x <>
test/command/6133.mdnew file+12
@@ -0,0 +1,12 @@
1+```
2+% pandoc -f markdown_mmd -t markdown_mmd -s
3+author: Author
4+title: Title
5+
6+Some text
7+^D
8+author: Author
9+title: Title
10+
11+Some text
12+```