diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-09-18 09:39:17 -0700 |
---|---|---|
committer | GitHub <noreply@github.com> | 2018-09-18 09:39:17 -0700 |
commit | 9161dc4a6d12d937a70bd806cc3af3e7dac5c9c7 (patch) | |
tree | 24cf3537d740f311f3308c8a45e79eb154f4c2b8 | |
parent | e09dc44c00ff1661280bbf544d1913c61a901360 (diff) | |
parent | db2a68d089e06bbf298b939252f826c84b6b6702 (diff) | |
download | pandoc-9161dc4a6d12d937a70bd806cc3af3e7dac5c9c7.tar.gz |
Merge pull request #4914 from danse/4912-2
parse rST inlines containing newlines closing #4912
-rw-r--r-- | src/Text/Pandoc/Readers/RST.hs | 2 | ||||
-rw-r--r-- | test/Tests/Readers/RST.hs | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index 6a9e7cb95..274c9da7a 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -1315,7 +1315,6 @@ table = gridTable False <|> simpleTable False <|> inline :: PandocMonad m => RSTParser m Inlines inline = choice [ note -- can start with whitespace, so try before ws , link - , endline , strong , emph , code @@ -1328,6 +1327,7 @@ inline = choice [ note -- can start with whitespace, so try before ws inlineContent :: PandocMonad m => RSTParser m Inlines inlineContent = choice [ whitespace , str + , endline , smart , hyphens , escapedChar diff --git a/test/Tests/Readers/RST.hs b/test/Tests/Readers/RST.hs index 8916eed6f..963e7530d 100644 --- a/test/Tests/Readers/RST.hs +++ b/test/Tests/Readers/RST.hs @@ -198,5 +198,8 @@ tests = [ "line block with blank line" =: , "bare URI parsing disabled inside emphasis (#4561)" =: "*http://location*" =?> para (emph (text "http://location")) + , "include newlines" =: + "**before\nafter**" =?> + para (strong (text "before\nafter")) ] ] |