ソースを参照

make the "FILE" property non-special when resolving bibtex values

* lisp/org-bibtex.el (org-bibtex-get): Make the "FILE" property
  non-special when resolving bibtex values.
Eric Schulte 13 年 前
コミット
f5a359f578
1 ファイル変更5 行追加2 行削除
  1. 5 2
      lisp/org-bibtex.el

+ 5 - 2
lisp/org-bibtex.el

@@ -279,8 +279,11 @@ This variable is relevant only if `org-bibtex-export-tags-as-keywords` is t."
 ;;; Utility functions
 (defun org-bibtex-get (property)
   ((lambda (it) (when it (org-babel-trim it)))
-   (or (org-entry-get (point) (upcase property))
-       (org-entry-get (point) (concat org-bibtex-prefix (upcase property))))))
+   (let ((org-special-properties
+	  (delete "FILE" (copy-sequence org-special-properties))))
+     (or
+      (org-entry-get (point) (upcase property))
+      (org-entry-get (point) (concat org-bibtex-prefix (upcase property)))))))
 
 (defun org-bibtex-put (property value)
   (let ((prop (upcase (if (keywordp property)