Mercurial > emacs
changeset 10553:3092c83a8a9d
(mouse-save-then-kill): Ignore mouse-selection-click-count if no active mark.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 26 Jan 1995 02:37:30 +0000 |
| parents | b804533a1254 |
| children | f5f5c52de2e4 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Wed Jan 25 09:04:07 1995 +0000 +++ b/lisp/mouse.el Thu Jan 26 02:37:30 1995 +0000 @@ -620,7 +620,7 @@ ;; 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))))))