(Emacs/elisp/org-bookmark)~prompts for differing functions
This commit is contained in:
@@ -114,7 +114,7 @@ as a string) and produces some action of opening it.")
|
||||
"Copy a bookmark's URL."
|
||||
(interactive)
|
||||
(let* ((bookmarks (org-bookmark/bookmarks))
|
||||
(choice (completing-read "Choose bookmark: " (mapcar #'car bookmarks) nil t))
|
||||
(choice (completing-read "Copy bookmark: " (mapcar #'car bookmarks) nil t))
|
||||
(pair (assoc choice bookmarks #'string=)))
|
||||
(if (null pair)
|
||||
(error (format "`%s' is not a valid bookmark" choice))
|
||||
@@ -126,7 +126,7 @@ as a string) and produces some action of opening it.")
|
||||
opening the url to some handler function."
|
||||
(interactive)
|
||||
(let* ((bookmarks (org-bookmark/bookmarks))
|
||||
(choice (completing-read "Choose bookmark: " (mapcar #'car bookmarks) nil t))
|
||||
(choice (completing-read "Open bookmark: " (mapcar #'car bookmarks) nil t))
|
||||
(pair (assoc choice bookmarks #'string=)))
|
||||
(if (null pair)
|
||||
(error (format "`%s' is not a valid bookmark" choice))
|
||||
|
||||
Reference in New Issue
Block a user