Nick Dokos <nicholas.do...@hp.com> wrote:
> Richard Lawrence <richard.lawre...@berkeley.edu> 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
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
