Mercurial > emacs
changeset 9936:b18fbb877233
(mouse-save-then-kill): Call mouse-show-mark
when we adjust an existing region.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 15 Nov 1994 16:57:24 +0000 |
| parents | a36d24b4b365 |
| children | cd2db9aeeb25 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Tue Nov 15 16:56:44 1994 +0000 +++ b/lisp/mouse.el Tue Nov 15 16:57:24 1994 +0000 @@ -675,8 +675,8 @@ (kill-new (buffer-substring (point) (mark t)) t)) ;; We just have point, so set mark here. (mouse-set-mark-fast click) - (kill-ring-save (point) (mark t)) - (mouse-show-mark)) + (kill-ring-save (point) (mark t))) + (mouse-show-mark) (setq mouse-save-then-kill-posn (list (car kill-ring) (point) click-posn))))))