diff options
| author | Stefan Monnier | 2005-10-04 20:54:26 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2005-10-04 20:54:26 +0000 |
| commit | d35b8a281b5d0ffa8ca33a4214047bc2f26d1b29 (patch) | |
| tree | 4ac46fa1b8339d3f48bb151168b3a454b4c92c7f | |
| parent | 0cb7f2c026948b6e093921b5bc6027f1daddddf0 (diff) | |
| download | emacs-d35b8a281b5d0ffa8ca33a4214047bc2f26d1b29.tar.gz emacs-d35b8a281b5d0ffa8ca33a4214047bc2f26d1b29.zip | |
(outline-mark-subtree): Activate the mark.
| -rw-r--r-- | lisp/outline.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 685 | (outline-previous-visible-heading 1)) | 685 | (outline-previous-visible-heading 1)) |
| 686 | (setq beg (point)) | 686 | (setq beg (point)) |
| 687 | (outline-end-of-subtree) | 687 | (outline-end-of-subtree) |
| 688 | (push-mark (point)) | 688 | (push-mark (point) nil t) |
| 689 | (goto-char beg))) | 689 | (goto-char beg))) |
| 690 | 690 | ||
| 691 | 691 | ||