opensource/pandoc
3
0
Fork 0
mirror of https://github.com/jgm/pandoc.git synced 2026-09-19 02:22:09 +08:00
Code Issues Packages Projects Releases Wiki Activity

RST reader: fix spurious newlines in some attributes from directives.

Browse Source
This commit is contained in:
John MacFarlane
2020-07-12 14:42:41 -07:00
parent 37e68a818b
commit e3217c3862
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Text/Pandoc/Readers/RST.hs
+2 -1
View File
@@ -223,7 +223,8 @@ rawFieldListItem minIndent = try $ do
first <- anyLine
rest <- option "" $ try $ do lookAhead (count indent (char ' ') >> spaceChar)
indentedBlock
let raw = (if T.null first then "" else first <> "\n") <> rest <> "\n"
let raw = (if T.null first then "" else first <> "\n") <> rest <>
(if T.null first && T.null rest then "" else "\n")
return (name, raw)
fieldListItem :: PandocMonad m => Int -> RSTParser m (Inlines, [Blocks])