Mercurial > emacs
changeset 55803:9070d5f984ea
(mouse-set-region-1): Use temporary transient-mark-mode
after the user marked text with the mouse.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 28 May 2004 21:06:26 +0000 |
| parents | 7bb617df33db |
| children | 9766648e58a2 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Fri May 28 21:05:17 2004 +0000 +++ b/lisp/mouse.el Fri May 28 21:06:26 2004 +0000 @@ -624,6 +624,8 @@ (mouse-set-region-1))) (defun mouse-set-region-1 () + ;; Set transient-mark-mode for a little while. + (setq transient-mark-mode (or transient-mark-mode 'lambda)) (setq mouse-last-region-beg (region-beginning)) (setq mouse-last-region-end (region-end)) (setq mouse-last-region-tick (buffer-modified-tick)))