Fix global dynamic variables prefixes in org-bibtex.el.
Thanks to Martyn Jago for the patch.
This commit is contained in:
parent
c24fa194a6
commit
08d9b46622
|
@ -112,7 +112,7 @@
|
|||
(eval-when-compile
|
||||
(require 'cl))
|
||||
|
||||
(defvar description nil) ; dynamically scoped from org.el
|
||||
(defvar org-bibtex-description nil) ; dynamically scoped from org.el
|
||||
(defvar org-id-locations)
|
||||
|
||||
(declare-function bibtex-beginning-of-entry "bibtex" ())
|
||||
|
@ -467,7 +467,7 @@ With optional argument OPTIONAL, also prompt for optional fields."
|
|||
:btype (or (cdr (assoc "=type=" entry)) "[no type]")
|
||||
:type "bibtex"
|
||||
:link link
|
||||
:description description))))
|
||||
:description org-bibtex-description))))
|
||||
|
||||
(defun org-create-file-search-in-bibtex ()
|
||||
"Create the search string and description for a BibTeX database entry."
|
||||
|
@ -485,7 +485,7 @@ With optional argument OPTIONAL, also prompt for optional fields."
|
|||
(bibtex-autokey-titleword-case-convert-function 'identity)
|
||||
(bibtex-autokey-titleword-length 'infty)
|
||||
(bibtex-autokey-year-title-separator ": "))
|
||||
(setq description (bibtex-generate-autokey)))
|
||||
(setq org-bibtex-description (bibtex-generate-autokey)))
|
||||
;; Now parse the entry, get the key and return it.
|
||||
(save-excursion
|
||||
(bibtex-beginning-of-entry)
|
||||
|
|
Loading…
Reference in New Issue