diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2021-06-28 13:34:12 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2021-06-28 13:34:12 -0700 |
| commit | 97b0aa667cce07e6552d0abb4f93469ba14f4eb0 (patch) | |
| tree | b02dca8e312fa467ea889cbb34d61410a0b76968 /src/Text/Pandoc/Citeproc | |
| parent | f045e59248116228093bfebf03ce9f7f4f0cc4ce (diff) | |
| download | pandoc-97b0aa667cce07e6552d0abb4f93469ba14f4eb0.tar.gz | |
Allow `$` characters in bibtex keys.
Closes #7409.
Diffstat (limited to 'src/Text/Pandoc/Citeproc')
| -rw-r--r-- | src/Text/Pandoc/Citeproc/BibTeX.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Citeproc/BibTeX.hs b/src/Text/Pandoc/Citeproc/BibTeX.hs index 1fe4a2730..c178de6e9 100644 --- a/src/Text/Pandoc/Citeproc/BibTeX.hs +++ b/src/Text/Pandoc/Citeproc/BibTeX.hs @@ -868,7 +868,7 @@ fieldName = resolveAlias . T.toLower isBibtexKeyChar :: Char -> Bool isBibtexKeyChar c = - isAlphaNum c || c `elem` (".:;?!`'()/*@_+=-[]*&" :: [Char]) + isAlphaNum c || c `elem` (".:;?!`'()$/*@_+=-[]*&" :: [Char]) bibItem :: BibParser Item bibItem = do |