diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-02-27 11:53:24 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-02-27 11:53:24 +0100 |
commit | 5738086a6b81adacc328f18712994f4316af7426 (patch) | |
tree | 46abcca4b9518d5ac521c940fdb2d0a7c147f694 | |
parent | 80bbf2440a3a418fd203c64b6d612f2dbdce6aea (diff) | |
download | org-mode-5738086a6b81adacc328f18712994f4316af7426.tar.gz |
ox: Small refactoring
* lisp/ox.el (org-export-prune-tree): Small refactoring.
-rw-r--r-- | lisp/ox.el | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -2057,8 +2057,7 @@ from tree." (org-element-property :archivedp data)) ;; If headline is archived but tree below has to ;; be skipped, remove contents. - (mapc #'org-element-extract-element - (org-element-contents data)) + (org-element-set-contents data) ;; Move into secondary string, if any. (let ((sec-prop (cdr (assq type org-element-secondary-value-alist)))) |