diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2013-01-08 10:04:40 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2013-01-08 10:04:40 -0800 |
| commit | d1ebde08a97ef5409d63fb588845e89851bcab8c (patch) | |
| tree | d10bee6a3254a157f776e1b05c983bf057cf3f3f /src/Text/Pandoc/Readers | |
| parent | 8ff81dc9caaff9e5dffbbe9148dfcf547c27d147 (diff) | |
| download | pandoc-d1ebde08a97ef5409d63fb588845e89851bcab8c.tar.gz | |
Added / to the list of letters that can occur in a citation key.
Diffstat (limited to 'src/Text/Pandoc/Readers')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 8c4855076..a3a2334a4 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1643,7 +1643,7 @@ citeKey = try $ do char '@' first <- letter let internal p = try $ p >>~ lookAhead (letter <|> digit) - rest <- many $ letter <|> digit <|> internal (oneOf ":.#$%&-_?<>~") + rest <- many $ letter <|> digit <|> internal (oneOf ":.#$%&-_?<>~/") let key = first:rest citations' <- map CSL.refId <$> getOption readerReferences guard $ key `elem` citations' |