don't rely on kill-new to return a string

* lisp/org-bibtex.el (org-bibtex-export-to-kill-ring): Don't rely on
  kill-new to return a string.
This commit is contained in:
Eric Schulte 2012-04-26 12:51:36 -04:00
parent fa7c989a3f
commit 5d5ce5d7b0
1 changed files with 2 additions and 1 deletions

View File

@ -661,7 +661,8 @@ This uses `bibtex-parse-entry'."
(defun org-bibtex-export-to-kill-ring ()
"Export current headline to kill ring as bibtex entry."
(interactive)
(kill-new (org-bibtex-headline)))
(let ((result (org-bibtex-headline)))
(kill-new result) result))
(defun org-bibtex-search (string)
"Search for bibliographical entries in agenda files.