diff options
author | Leonard Randall <leonard.a.randall@gmail.com> | 2014-04-20 08:30:01 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2014-04-20 08:30:01 +0200 |
commit | 24a1f7295c367956b6a7e241c5d0f96075d570e7 (patch) | |
tree | 5fb67573b1f8393e3ed4c8ee18deae00a3e3efec | |
parent | 9272ef3e17278d1d46f56cda3459ce9d17dcc87d (diff) | |
download | org-mode-24a1f7295c367956b6a7e241c5d0f96075d570e7.tar.gz |
org-bibtex.el (org-bibtex-headline): Fix insertion of keywords
* org-bibtex.el (org-bibtex-headline): Fix insertion of
keywords of unknown BibTeX entries.
TINYCHANGE
-rw-r--r-- | lisp/org-bibtex.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/org-bibtex.el b/lisp/org-bibtex.el index 78520f2..dee5389 100644 --- a/lisp/org-bibtex.el +++ b/lisp/org-bibtex.el @@ -371,7 +371,9 @@ This variable is relevant only if `org-bibtex-tags-are-keywords' is t." (bibtex-beginning-of-entry) (if (re-search-forward "keywords.*=.*{\\(.*\\)}" nil t) (progn (goto-char (match-end 1)) (insert ", ")) - (ignore-errors (bibtex-make-field "keywords" t t))) + (progn (re-search-forward ",\\(\n\\)" nil t) + (insert " keywords={},\n")) + (re-search-backward "}," nil t)) (insert (mapconcat #'identity tags ", "))) (buffer-string)))))) |