Browse Source

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

Carsten Dominik 15 years ago
parent
commit
a93815c686
1 changed files with 2 additions and 1 deletions
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -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)