diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2014-08-25 15:19:24 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2014-08-25 15:21:50 +0200 |
| commit | e191a76ddd63845692b46fbc41f2bdb9eb688e5a (patch) | |
| tree | 897b9d03f69cffcd8004d1bf4294979780abbbed | |
| parent | 896fa6d1f7dc58a4937f542e38a48ff69c0fddfd (diff) | |
| download | org-mode-e191a76ddd63845692b46fbc41f2bdb9eb688e5a.tar.gz | |
org-agenda: Fix order when writing to an ".org" file
* lisp/org-agenda.el (org-agenda-write): Write headings in proper
order.
`org-paste-subtree' leaves point before inserted text, so there is no
need to reverse contents.
http://permalink.gmane.org/gmane.emacs.orgmode/89867
| -rw-r--r-- | lisp/org-agenda.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 0067165..4b6385b 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -3352,7 +3352,7 @@ If AGENDA-BUFFER-NAME, use this as the buffer name for the agenda to write." content))) (find-file file) (erase-buffer) - (mapcar (lambda (s) (org-paste-subtree 1 s)) (reverse content)) + (dolist (s content) (org-paste-subtree 1 s)) (write-file file) (kill-buffer (current-buffer)) (message "Org file written to %s" file))) |