aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/RST.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-08-29 14:40:04 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-08-29 14:40:04 -0700
commit85ed24e849975051f370dd8bf98c6c62ca92447a (patch)
tree1ad39785429e18f78b12fd94e37f62a41b24d411 /src/Text/Pandoc/Readers/RST.hs
parent7c0b314cbeeaa1248007c40ac9f0d1b5cc4289da (diff)
downloadpandoc-85ed24e849975051f370dd8bf98c6c62ca92447a.tar.gz
RSTR reader: don't skip link definitions after comments.
Closes #4860.
Diffstat (limited to 'src/Text/Pandoc/Readers/RST.hs')
-rw-r--r--src/Text/Pandoc/Readers/RST.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs
index 576c3b77c..6a9e7cb95 100644
--- a/src/Text/Pandoc/Readers/RST.hs
+++ b/src/Text/Pandoc/Readers/RST.hs
@@ -172,6 +172,7 @@ parseRST = do
docMinusKeys <- concat <$>
manyTill (referenceKey <|> anchorDef <|>
noteBlock <|> citationBlock <|>
+ (snd <$> withRaw comment) <|>
headerBlock <|> lineClump) eof
setInput docMinusKeys
setPosition startPos