From ad14280fb7d234c52aa1b4119081d9254c0bd116 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 26 Jan 1995 02:37:30 +0000 Subject: [PATCH] (mouse-save-then-kill): Ignore mouse-selection-click-count if no active mark. --- lisp/mouse.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mouse.el b/lisp/mouse.el index 81fdee47e5a..c730f8a929f 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -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)))))) -- 2.39.5