[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master bb0f925 1/2: Revert "Bind `widget-button-click' to

From: Martin Rudalics
Subject: [Emacs-diffs] master bb0f925 1/2: Revert "Bind `widget-button-click' to mouse-1/-2 instead of down-mouse-1/-2"
Date: Fri, 10 Jun 2016 06:22:50 +0000 (UTC)

branch: master
commit bb0f9253dc267c2d8f2e88d441b13a98d2e6d207
Author: Martin Rudalics <address@hidden>
Commit: Martin Rudalics <address@hidden>

    Revert "Bind `widget-button-click' to mouse-1/-2 instead of down-mouse-1/-2"
    * lisp/wid-edit.el (widget-keymap): Bind `widget-button-click'
    to mouse-1/-2 instead of down-mouse-1/-2.  Suggested by Stefan
    Monnier.  (Bug#19185, Bug#20398)
    This reverts commit 72166f2f3dba18f1217c666574032f5a0351ed65.
    That commit did more harm than good (Bug#23571).
 lisp/wid-edit.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 9ede9a5..4ec14d6 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -852,8 +852,8 @@ button end points."
     (define-key map [(shift tab)] 'widget-backward)
     (put 'widget-backward :advertised-binding [(shift tab)])
     (define-key map [backtab] 'widget-backward)
-    (define-key map [mouse-2] 'widget-button-click)
-    (define-key map [mouse-1] 'widget-button-click)
+    (define-key map [down-mouse-2] 'widget-button-click)
+    (define-key map [down-mouse-1] 'widget-button-click)
     ;; The following definition needs to avoid using escape sequences that
     ;; might get converted to ^M when building loaddefs.el
     (define-key map [(control ?m)] 'widget-button-press)

reply via email to

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