emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] Org mode links for helm


From: Thomas S. Dye
Subject: Re: [O] Org mode links for helm
Date: Sat, 24 May 2014 17:32:06 -1000

Aloha Bastien,

Bastien <address@hidden> writes:

> Hi Thomas,
>
> address@hidden (Thomas S. Dye) writes:
>
>> Has anyone implemented a helm interface for Org-mode #+name lines?  I
>> think it might be useful for inserting cross reference links.
>
> did you try
>
> https://github.com/emacs-helm/helm/blob/master/helm-org.el
>
> ?

This code, adapted from some code I found on John Kitchin's blog, does
what I want.

** Cross references
#+name: tsd-xref
#+begin_src emacs-lisp
(defun tsd-get-names-and-labels ()
  (interactive)
  (save-excursion
    (goto-char (point-min))
    (let ((matches '()))
      (while (re-search-forward "\\#\\+\\(name\\|label\\):\\s-\\(.*\\)" 
(point-max) t)
        (add-to-list 'matches (match-string-no-properties 2) t))
      matches)))

(defun tsd-org-insert-crossref-link (&optional arg)
  (interactive (list (completing-read "insert: " (tsd-get-names-and-labels))))
  (insert (format "[[%s]]" arg)))
#+end_src

Now, when I'm referring to something I've labeled or named, I call
tsd-org-insert-crossref-link and helm works on a list of labels and
names defined in the buffer.

It's almost as convenient as using Carsten's reftex mode when writing in
LaTeX.

All the best,
Tom
-- 
Thomas S. Dye
http://www.tsdye.com



reply via email to

[Prev in Thread] Current Thread [Next in Thread]