0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-27 16:02:58 +00:00

Menu entry for `org-occur-link-in-agenda-files'

This commit is contained in:
Carsten Dominik 2009-08-02 15:56:58 +02:00
parent d8732b3938
commit a93815c686

View file

@ -15064,6 +15064,7 @@ See the individual commands for more information."
"--" "--"
("Hyperlinks" ("Hyperlinks"
["Store Link (Global)" org-store-link t] ["Store Link (Global)" org-store-link t]
["Find existing link to here" org-occur-link-in-agenda-files t]
["Insert Link" org-insert-link t] ["Insert Link" org-insert-link t]
["Follow Link" org-open-at-point t] ["Follow Link" org-open-at-point t]
"--" "--"
@ -15703,7 +15704,7 @@ for the search purpose."
(interactive) (interactive)
(let ((link (condition-case nil (let ((link (condition-case nil
(org-store-link nil) (org-store-link nil)
(error "Unable to create a link from here")))) (error "Unable to create a link to here"))))
(org-occur-in-agenda-files (regexp-quote link)))) (org-occur-in-agenda-files (regexp-quote link))))
(defun org-uniquify (list) (defun org-uniquify (list)