aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/RST.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs
index 2391fa497..29518fbe1 100644
--- a/src/Text/Pandoc/Readers/RST.hs
+++ b/src/Text/Pandoc/Readers/RST.hs
@@ -603,6 +603,7 @@ link = choice [explicitLink, referenceLink, autoLink,
explicitLink = try (do
char '`'
+ notFollowedBy (char '`') -- `` is marks start of inline code
label <- manyTill inline (try (do {spaces; char '<'}))
src <- manyTill (noneOf ">\n ") (char '>')
skipSpaces
@@ -625,6 +626,7 @@ anonymousLinkEnding = try (do
referenceLink = try (do
char '`'
+ notFollowedBy (char '`')
label <- manyTill inline (char '`')
char '_'
src <- option (Ref []) anonymousLinkEnding