On 6/23/11 2:17 PM, Memnon Anon wrote:
(defun my-extract-link ()
   "Extract the link location at point and put it on the killring."
   (interactive)
   (when (org-in-regexp org-bracket-link-regexp 1)
     (kill-new (org-link-unescape (org-match-string-no-properties 1)))))

Thanks, that seems to work nicely!

Thanks for the tip about saving two keystrokes by aborting with C-g, too -- why didn't I think of that??

Yours,
Christian

Reply via email to