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!
--
Bastien
next prev 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:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
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 \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* 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
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
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).