mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(mouse-save-then-kill): Ignore mouse-selection-click-count if no active mark.

Browse source
This commit is contained in:
Richard M. Stallman 1995-01-26 02:37:30 +00:00
parent dcbea62ef1
commit ad14280fb7
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mouse.el
View file

@ -620,7 +620,7 @@ If you do this twice in the same position, the selection is killed."
;; Don't let a subsequent kill command append to this one:
;; prevent setting this-command to kill-region.
(this-command this-command))
(if (> (mod mouse-selection-click-count 3) 0)
(if (and (mark t) (> (mod mouse-selection-click-count 3) 0))
(if (not (and (eq last-command 'mouse-save-then-kill)
(equal click-posn
(car (cdr-safe (cdr-safe mouse-save-then-kill-posn))))))