From: Nicolas Goaziou <n.goaziou@gmail.com>
To: emacs-orgmode Mode <emacs-orgmode@gnu.org>
Cc: Myles English <mylesenglish@gmail.com>, nicholas.dokos@hp.com
Subject: Re: org-goto-local-search-headings usage?
Date: Wed, 16 May 2012 16:56:45 +0200 [thread overview]
Message-ID: <87txzgjhsi.fsf@gmail.com> (raw)
In-Reply-To: <877gwcl8oe.fsf@gmail.com> (Myles English's message of "Wed, 16 May 2012 11:30:41 +0100")
Hello,
Myles English <mylesenglish@gmail.com> writes:
> Thanks for the advice, I ended up using bit of org-element.el instead of
> org-goto-local-search-headings and doing this:
>
> #+BEGIN_SRC elisp
> (defun gotoWF(hl)
> (let ((title (car (org-element-property :title hl))))
> (if (and (stringp title)
> (string= title "My workflow"))
> (progn (goto-char (org-element-property :begin hl))
> (org-show-entry)
> (org-show-subtree))
> nil)))
>
> (require 'org-element)
> (defun gtd()
> (interactive)
> (org-element-map (org-element-parse-buffer) 'headline 'gotoWF nil t)
> (org-agenda-list))
> #+END_SRC
I highly suggest to use (org-element-parse-buffer 'headline) instead of
plain (org-element-parse-buffer), since you really don't need to spend
time parsing the buffer down to the smallest object.
Also, you should check :raw-value property instead of :title, since the
latter is a secondary string (a list containing strings and objects)
which, as such, will never match a string. :raw-value, on the other
hand, is always a string and doesn't require the (stringp title) test.
Regards,
--
Nicolas Goaziou
next prev parent reply other threads:[~2012-05-16 14:59 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-05-15 15:28 org-goto-local-search-headings usage? Myles English
2012-05-15 15:48 ` Nick Dokos
2012-05-15 21:09 ` Myles English
2012-05-15 21:33 ` Nick Dokos
2012-05-15 21:44 ` Nick Dokos
2012-05-16 10:30 ` Myles English
2012-05-16 14:56 ` Nicolas Goaziou [this message]
2012-05-16 20:37 ` Myles English
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87txzgjhsi.fsf@gmail.com \
--to=n.goaziou@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=mylesenglish@gmail.com \
--cc=nicholas.dokos@hp.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 external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.