From c700c0c6ddb8ad60ced215cd23b63afce6f101be Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Tue, 18 Feb 2014 16:38:32 -0500 Subject: Flip prefix when making Org indirect buffer --- lisp/init-org.el | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'lisp') diff --git a/lisp/init-org.el b/lisp/init-org.el index bd6acb2..99245cb 100644 --- a/lisp/init-org.el +++ b/lisp/init-org.el @@ -91,6 +91,20 @@ (add-to-list 'auto-mode-alist '("\\.org.txt$" . org-mode)) +(defadvice org-tree-to-indirect-buffer (before + org-keep-previous-indirect + (&optional arg) + activate) + "Retain previous indirect buffer from `org-tree-to-indirect-buffer'. +By default, `org-tree-to-indirect-buffer' deletes the previous +indirect buffer when making a new one to avoid accumulating +buffers, which can be overriden by a C-u prefix. This advice +reverses this behavior so that the prefix must be given in order +to delete the previous indirect buffer. If the argument is a +number, which has a different meaning, it is left untouched." + (unless (numberp arg) + (setq arg (not arg)))) + ;;; Org in other modes (defun km/load-orgstruct () (turn-on-orgstruct++) -- cgit v1.2.3