[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-27 a296002: Revert "* lisp/mouse.el: Fix mouse-1-clock-follows-mou
From: |
Stefan Monnier |
Subject: |
emacs-27 a296002: Revert "* lisp/mouse.el: Fix mouse-1-clock-follows-mouse = double" |
Date: |
Fri, 12 Mar 2021 14:32:34 -0500 (EST) |
branch: emacs-27
commit a2960025e8e029bcccf22143e183b9e1e9965dd6
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
Revert "* lisp/mouse.el: Fix mouse-1-clock-follows-mouse = double"
This reverts commit 02a5cfce471613f671722b35536d2a78f17b0429.
That commit breaks because of a missing patch to `parse_modifiers_uncached`
in `src/keyboard.c`. IOW, too risky for `emacs-27`.
Don't merge to `master`.
---
lisp/mouse.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 6b8e65c..72ad77c 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -116,9 +116,7 @@ Expects to be bound to `(double-)mouse-1' in
`key-translation-map'."
(time-since (cdr mouse--last-down))
(/ (abs mouse-1-click-follows-link) 1000.0))))))
(eq (car mouse--last-down)
- (event-convert-list
- `(down ,@(event-modifiers last-input-event)
- ,(event-basic-type last-input-event))))
+ (event-convert-list (list 'down (car-safe last-input-event))))
(let* ((action (mouse-on-link-p (event-start last-input-event))))
(when (and action
(or mouse-1-click-in-non-selected-windows
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-27 a296002: Revert "* lisp/mouse.el: Fix mouse-1-clock-follows-mouse = double",
Stefan Monnier <=