emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Bastien <bzg@altern.org>
To: Memnon Anon <gegendosenfleisch@googlemail.com>
Cc: emacs-orgmode@gnu.org
Subject: Re: Function: Extract link location to killring
Date: Sat, 02 Jul 2011 11:29:31 +0200	[thread overview]
Message-ID: <871uy9ghdw.fsf@gnu.org> (raw)
In-Reply-To: <87oc1ozqzu.fsf@mean.albasani.net> (Memnon Anon's message of "Thu, 23 Jun 2011 12:17:24 +0000 (UTC)")

Memnon, Eric,

Memnon Anon <gegendosenfleisch@googlemail.com> writes:

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

Eric S Fraga <e.fraga@ucl.ac.uk> writes:

> And if you do this, saving it as a kmacro, you can generate code that
> does this:
> #+begin_src emacs-lisp
> (fset 'getlink
>       (lambda (&optional arg) 
>         "Keyboard macro." 
>         (interactive "p") 
>         (kmacro-exec-ring-item (quote ("\C-c\C-l\C-a\C-k\C-g" 0 "%d")) arg)))
> #+end_src
> You can then bind /getlink/ to a key or execute it directly with 
> M-x getlink RET

These two snippets could live on Worg -- can anyone add this to
org-hacks.el (or any relevant place)?

Thanks in advance!


  parent reply	other threads:[~2011-07-02  9:29 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-06-23  9:31 Copy link at point Christian Moe
2011-06-23 11:03 ` Christian Moe
2011-06-23 12:00   ` Memnon Anon
2011-06-23 12:56     ` Eric S Fraga
2011-06-23 15:42       ` Christian Moe
2011-06-23 12:17   ` Function: Extract link location to killring (was: Copy link at point) Memnon Anon
2011-06-23 14:20     ` Function: Extract link location to killring Christian Moe
2011-07-02  9:29     ` Bastien [this message]
2011-07-03  0:30       ` Memnon Anon
2011-07-03 11:27         ` Bastien

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=871uy9ghdw.fsf@gnu.org \
    --to=bzg@altern.org \
    --cc=emacs-orgmode@gnu.org \
    --cc=gegendosenfleisch@googlemail.com \


* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox


This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).