org-bibtex: Fix curly braces removal

* lisp/org-bibtex.el (org-bibtex-read): Only remove one level of curly
  braces when parsing an entry.

Reported-by: timor <timor.dd@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/106495>
This commit is contained in:
Nicolas Goaziou 2016-04-20 22:59:55 +02:00
parent 7dd0d7a567
commit 466d044a9b
1 changed files with 1 additions and 1 deletions

View File

@ -630,7 +630,7 @@ This uses `bibtex-parse-entry'."
"[[:space:]\n\r]+" " " str)))
(strip-delim
(lambda (str) ; strip enclosing "..." and {...}
(dolist (pair '((34 . 34) (123 . 125) (123 . 125)))
(dolist (pair '((34 . 34) (123 . 125)))
(when (and (> (length str) 1)
(= (aref str 0) (car pair))
(= (aref str (1- (length str))) (cdr pair)))