diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-11-15 16:57:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-11-15 16:57:24 +0000 |
| commit | 1078c6e6edc53fa1d66b478c6800aec4630cdc47 (patch) | |
| tree | 657924cc974cf3b340f2b68586fccf18a111d813 /lisp/mouse.el | |
| parent | 7f23c78c9c0a672901dd6aaa0428549d3516a41c (diff) | |
| download | emacs-1078c6e6edc53fa1d66b478c6800aec4630cdc47.tar.gz | |
(mouse-save-then-kill): Call mouse-show-mark
when we adjust an existing region.
Diffstat (limited to 'lisp/mouse.el')
| -rw-r--r-- | lisp/mouse.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 96aa3db85bd..6ee1cfb0fbc 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -675,8 +675,8 @@ If you do this twice in the same position, the selection is killed." (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)))))) |