diff options
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." | |||
| 586 | (add-hook 'deactivate-mark-hook | 586 | (add-hook 'deactivate-mark-hook |
| 587 | (lambda () (rectangle-mark-mode -1))) | 587 | (lambda () (rectangle-mark-mode -1))) |
| 588 | (unless (region-active-p) | 588 | (unless (region-active-p) |
| 589 | (push-mark) | 589 | (push-mark (point) t t) |
| 590 | (activate-mark) | ||
| 591 | (message "Mark set (rectangle mode)")))) | 590 | (message "Mark set (rectangle mode)")))) |
| 592 | 591 | ||
| 593 | (defun rectangle-exchange-point-and-mark (&optional arg) | 592 | (defun rectangle-exchange-point-and-mark (&optional arg) |