[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] org-map-entries and org-map-continue-from
From: |
Nick Dokos |
Subject: |
Re: [O] org-map-entries and org-map-continue-from |
Date: |
Mon, 28 Feb 2011 14:14:39 -0500 |
Nick Dokos <address@hidden> wrote:
> Richard Lawrence <address@hidden> wrote:
>
>
> > For a simple example, suppose I write:
> > #+BEGIN_SRC emacs-lisp
> > (defun get-export-filenames ()
> > (interactive)
> > (setq export-files '())
> > (progn
> > (org-map-entries
> > (lambda ()
> > (setq org-map-continue-from (outline-next-heading))
> > (let ((org-trust-scanner-tags t))
> > (push (org-entry-get (point) "EXPORT_FILE_NAME") export-files)))
> > nil 'tree)
> > (message export-files))) ; errors, but lets me see the list of
> > collected values
> > #+END_SRC
> >
>
> But I'm not sure what the right way to deal with it is.
>
Maybe this?
--8<---------------cut here---------------start------------->8---
#+BEGIN_SRC emacs-lisp
(defun get-export-filenames ()
(interactive)
(setq export-files '())
(progn
(org-map-entries
(lambda ()
(setq org-map-continue-from (outline-next-heading))
(if org-map-continue-from
(let ((org-trust-scanner-tags t))
(push (org-entry-get (point) "EXPORT_FILE_NAME") export-files))))
nil 'tree)
(message export-files))) ; errors, but lets me see the list of collected
values
#+END_SRC
--8<---------------cut here---------------end--------------->8---
Nick