summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <n.goaziou@gmail.com>2011-07-05 20:42:15 +0200
committerNicolas Goaziou <n.goaziou@gmail.com>2011-07-05 20:42:15 +0200
commit301b3450fedad4b27fb797ef806956ee37a54221 (patch)
tree08438cea4923ca642b55f70baadfebfec0b66a98
parentde0fcdffa48da8baf57a612f2ce032d8737e6525 (diff)
downloadorg-mode-301b3450fedad4b27fb797ef806956ee37a54221.tar.gz
org-exp: remove tasks before normalizing footnotes
* lisp/org-exp.el (org-export-preprocess-string): if the last subtree is a task, footnotes may be removed along with the subtree. This patch ensures footnotes are put at the end of the buffer after the subtree has been removed.
-rw-r--r--lisp/org-exp.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org-exp.el b/lisp/org-exp.el
index a00a71f..b561eaf 100644
--- a/lisp/org-exp.el
+++ b/lisp/org-exp.el
@@ -1138,13 +1138,13 @@ on this string to produce the exported version."
(plist-get parameters :exclude-tags))
(run-hooks 'org-export-preprocess-after-tree-selection-hook)
+ ;; Get rid of tasks, depending on configuration
+ (org-export-remove-tasks (plist-get parameters :tasks))
+
;; Normalize footnotes
(when (plist-get parameters :footnotes)
(org-footnote-normalize nil 'pre-process-p))
- ;; Get rid of tasks, depending on configuration
- (org-export-remove-tasks (plist-get parameters :tasks))
-
;; Export code blocks
(org-export-blocks-preprocess)