diff options
Diffstat (limited to 'Text/Pandoc')
| -rw-r--r-- | Text/Pandoc/Readers/RST.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Text/Pandoc/Readers/RST.hs b/Text/Pandoc/Readers/RST.hs index 67a4f6539..fb3129eac 100644 --- a/Text/Pandoc/Readers/RST.hs +++ b/Text/Pandoc/Readers/RST.hs @@ -570,8 +570,9 @@ link = choice [explicitLink, referenceLink, autoLink] <?> "link" explicitLink = try $ do char '`' - notFollowedBy (char '`') -- `` is marks start of inline code - label <- manyTill inline (try (spaces >> char '<')) + notFollowedBy (char '`') -- `` marks start of inline code + label <- manyTill (notFollowedBy (char '`') >> inline) + (try (spaces >> char '<')) src <- manyTill (noneOf ">\n ") (char '>') skipSpaces string "`_" |