From mboxrd@z Thu Jan 1 00:00:00 1970 From: Leu Zhe Subject: =?UTF-8?B?wrdPcGVuIGZvb3Rub3RlIGxpbmsgZGVmaW5pdGlvbiBmcm9tIHJl?= =?UTF-8?B?ZmVyZW5jZSBkaXJlY3RseQ==?= Date: Mon, 28 Jul 2014 09:11:53 +0900 Message-ID: Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=047d7bea318499d5f304ff35c773 Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:49175) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XBYYO-0000LV-2K for emacs-orgmode@gnu.org; Sun, 27 Jul 2014 20:12:36 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XBYYM-0005TT-Uk for emacs-orgmode@gnu.org; Sun, 27 Jul 2014 20:12:36 -0400 Received: from mail-qa0-x22f.google.com ([2607:f8b0:400d:c00::22f]:37299) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XBYYM-0005TL-QJ for emacs-orgmode@gnu.org; Sun, 27 Jul 2014 20:12:34 -0400 Received: by mail-qa0-f47.google.com with SMTP id i13so7122228qae.34 for ; Sun, 27 Jul 2014 17:12:34 -0700 (PDT) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: "emacs-orgmode@gnu.org" --047d7bea318499d5f304ff35c773 Content-Type: text/plain; charset=ISO-8859-1 Hi orgers, I wrote a little snippet below to open footnote link definition directly with a single call. I think it will be very useful when you have a lot of link footnote definitions in you documents. Since I am a newbie to lisp, any advice of improvement will be really appreciate. (defun open-footnote-link () "Open footnote link directly without going to definition" (interactive) (save-excursion (if (org-footnote-at-reference-p) (progn (org-footnote-action) (forward-word) (org-kill-note-or-show-branches) (org-open-at-point)) (message "Must be in footnotes with link definition")))) (global-set-key (kbd "C-c C-x l") 'open-footnote-link) --047d7bea318499d5f304ff35c773 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable
Hi orgers,

I wrote a little = snippet below to open footnote link definition directly with a single call.=
I think it will be very useful when you have a lot of link footn= ote definitions in you documents.
Since I am a newbie to lisp, any advice of improvement will be really = appreciate.

(defun open-footnote-link ()
=A0 "Open footnote link directly without going to definition"
=A0 (interactive)
=A0 (save-excursion
=A0 =A0 (if = (org-footnote-at-reference-p)
(progn
=A0(org-footnote-action)
=A0(forward-word)<= /div>
=A0(org-kill-= note-or-show-branches)
=A0(org-open-at-point))
=A0 =A0 (message "Must be in footnotes with link definition"= ))))

(global-set-key (kbd "C-c C-x l") &= #39;open-footnote-link)

--047d7bea318499d5f304ff35c773--