org.el (org-store-link): When a link has been stored, always returns it

* org.el (org-store-link): When a link has been stored, always
returns it.

(Storing links from the agenda are broken otherwise.)
This commit is contained in:
Bastien Guerry 2014-01-12 09:56:41 +01:00
parent 9305b41ceb
commit 035087777d
1 changed files with 2 additions and 2 deletions

View File

@ -9608,8 +9608,8 @@ active region."
(message "Stored: %s" (or desc link)) (message "Stored: %s" (or desc link))
(when custom-id (when custom-id
(setq link (concat "file:" (abbreviate-file-name (setq link (concat "file:" (abbreviate-file-name
(buffer-file-name)) "::#" custom-id)) (buffer-file-name)) "::#" custom-id)))
(push (list link desc) org-stored-links))))))) (push (list link desc) org-stored-links))))))
(defun org-store-link-props (&rest plist) (defun org-store-link-props (&rest plist)
"Store link properties, extract names and addresses." "Store link properties, extract names and addresses."