瀏覽代碼

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.)
Bastien Guerry 11 年之前
父節點
當前提交
035087777d
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      lisp/org.el

+ 2 - 2
lisp/org.el

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