git.iko.soy/typeable/pandoc
on master help sign in
Markdown reader: Allow internal `+` in citation identifiers.
b89a443John MacFarlane
src/Text/Pandoc/Readers/Markdown.hs+1−1
compare with master
unifiedsplit
@@ -1705,7 +1705,7 @@ citeKey = try $ do
1705 char '@'
1705 char '@'
1706 first <- letter
1706 first <- letter
1707 let internal p = try $ p >>~ lookAhead (letter <|> digit)
1707 let internal p = try $ p >>~ lookAhead (letter <|> digit)
1708− rest <- many $ letter <|> digit <|> internal (oneOf ":.#$%&-_?<>~/")
1708+ rest <- many $ letter <|> digit <|> internal (oneOf ":.#$%&-_+?<>~/")
1709 let key = first:rest
1709 let key = first:rest
1710 citations' <- map CSL.refId <$> getOption readerReferences
1710 citations' <- map CSL.refId <$> getOption readerReferences
1711 guard $ key `elem` citations'
1711 guard $ key `elem` citations'