summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatt Lundin <mclundin@gmail.com>2017-11-25 09:26:15 -0600
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2017-11-26 10:52:31 +0100
commitb186d1d7236c0dc397eadeb004c9a17eaffd3aab (patch)
treec2dda4a6ec0524e651f40bcc540c5a17a5b7f2c8
parent26c2ad99cfc2c7776ea58aa2fbb60fbd872f2372 (diff)
downloadorg-mode-b186d1d7.tar.gz
Do not save target buffer after archiving subtree
* lisp/org-archive.el: (org-archive-subtree) Do not save buffer after each archive. Saving the archive buffer after archiving each subtree results in substantial slowdown and many writes to disk when archiving an active region. This brings the behavior of org-archive-subtree into line with org-refile, which does not save the target buffer after refiling.
-rw-r--r--lisp/org-archive.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/org-archive.el b/lisp/org-archive.el
index b2e2178..37c5d6f 100644
--- a/lisp/org-archive.el
+++ b/lisp/org-archive.el
@@ -381,10 +381,7 @@ direct children of this heading."
(point)
(concat "ARCHIVE_" (upcase (symbol-name item)))
value))))
- (widen)
- ;; Save and kill the buffer, if it is not the same
- ;; buffer.
- (unless (eq this-buffer buffer) (save-buffer)))))
+ (widen))))
;; Here we are back in the original buffer. Everything seems
;; to have worked. So now run hooks, cut the tree and finish
;; up.