@@ -603,6 +603,7 @@ link = choice [explicitLink, referenceLink, autoLink,
604explicitLink = try (do
604explicitLink = try (do
606+ notFollowedBy (char '`') -- `` is marks start of inline code
606 label <- manyTill inline (try (do {spaces; char '<'}))
607 label <- manyTill inline (try (do {spaces; char '<'}))
607 src <- manyTill (noneOf ">\n ") (char '>')
608 src <- manyTill (noneOf ">\n ") (char '>')
608 skipSpaces
609 skipSpaces
@@ -625,6 +626,7 @@ anonymousLinkEnding = try (do
626referenceLink = try (do
627referenceLink = try (do
629+ notFollowedBy (char '`')
628 label <- manyTill inline (char '`')
630 label <- manyTill inline (char '`')
630 src <- option (Ref []) anonymousLinkEnding
632 src <- option (Ref []) anonymousLinkEnding