From d35b8a281b5d0ffa8ca33a4214047bc2f26d1b29 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 4 Oct 2005 20:54:26 +0000 Subject: [PATCH] (outline-mark-subtree): Activate the mark. --- lisp/outline.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/outline.el b/lisp/outline.el index 012396c2eb0..8a05aaf0cd9 100644 --- a/lisp/outline.el +++ b/lisp/outline.el @@ -685,7 +685,7 @@ This puts point at the start of the current subtree, and mark at the end." (outline-previous-visible-heading 1)) (setq beg (point)) (outline-end-of-subtree) - (push-mark (point)) + (push-mark (point) nil t) (goto-char beg))) -- 2.39.2