emacs-diffs
[Top][All Lists]
Advanced

[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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]