@@ -603,6 +603,7 @@ link = choice [explicitLink, referenceLink, autoLink,
603603
604604explicitLink = try (do
605605 char '`'
606+ notFollowedBy (char '`') -- `` is marks start of inline code
606607 label <- manyTill inline (try (do {spaces; char '<'}))
607608 src <- manyTill (noneOf ">\n ") (char '>')
608609 skipSpaces
@@ -625,6 +626,7 @@ anonymousLinkEnding = try (do
625626
626627referenceLink = try (do
627628 char '`'
629+ notFollowedBy (char '`')
628630 label <- manyTill inline (char '`')
629631 char '_'
630632 src <- option (Ref []) anonymousLinkEnding