diff options
author | Kelly Dean <kelly@prtime.org> | 2015-02-18 07:38:13 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-18 16:36:24 -0200 |
commit | 56f5ea17f19bfb07e263dd2d59a3c61b652fcc3d (patch) | |
tree | c2fd1c5842c067221efb5f744b46c79055400d61 /lisp/rect.el | |
parent | 72f7eded979c672662112304cc8615c0dbcf9803 (diff) | |
download | emacs-56f5ea17f19bfb07e263dd2d59a3c61b652fcc3d.tar.gz |
rect.el: Suppress superfluous "Mark set" message from push-mark.
Diffstat (limited to 'lisp/rect.el')
-rw-r--r-- | lisp/rect.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/rect.el b/lisp/rect.el index c5a548647f3..75585d2f080 100644 --- a/lisp/rect.el +++ b/lisp/rect.el @@ -586,8 +586,7 @@ Activates the region if needed. Only lasts until the region is deactivated." (add-hook 'deactivate-mark-hook (lambda () (rectangle-mark-mode -1))) (unless (region-active-p) - (push-mark) - (activate-mark) + (push-mark (point) t t) (message "Mark set (rectangle mode)")))) (defun rectangle-exchange-point-and-mark (&optional arg) |