update packages
This commit is contained in:
@@ -6,7 +6,8 @@
|
||||
;; Author: Joost Kremers <joostkremers@fastmail.fm>
|
||||
;; Maintainer: Joost Kremers <joostkremers@fastmail.fm>
|
||||
;; Created: 2014
|
||||
;; Version: 6.6
|
||||
;; Package-Version: 20250316.2257
|
||||
;; Package-Revision: 7bfde4e46794
|
||||
;; Keywords: text bibtex
|
||||
;; URL: https://github.com/joostkremers/parsebib
|
||||
;; Package-Requires: ((emacs "25.1"))
|
||||
@@ -373,6 +374,10 @@ should be read literally."
|
||||
"Parse text in double quotes."
|
||||
(parsebib--string ?\" ?\\))
|
||||
|
||||
(defun parsebib--key ()
|
||||
"Parse a BibTeX key."
|
||||
(parsebib--symbol parsebib--bibtex-key-regexp))
|
||||
|
||||
(defun parsebib--identifier ()
|
||||
"Parse a BibTeX identifier."
|
||||
(parsebib--symbol parsebib--bibtex-identifier))
|
||||
@@ -462,7 +467,7 @@ Return the entry as an alist of <field . value> pairs, where
|
||||
(if-let* ((_ (parsebib--char '(?@)))
|
||||
(type (parsebib--identifier))
|
||||
(open (parsebib--char '(?\{ ?\( )))
|
||||
(key (parsebib--identifier))
|
||||
(key (parsebib--key))
|
||||
(_ (parsebib--char '(?,)))
|
||||
(fields (parsebib--fields))
|
||||
(_ (parsebib--char (alist-get open '((?\{ ?\}) (?\( ?\)))))))
|
||||
|
||||
Reference in New Issue
Block a user