[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master eca7368039d: * lisp/mwheel.el (mouse-wheel-obey-old-style-wheel-b
From: |
Stefan Monnier |
Subject: |
master eca7368039d: * lisp/mwheel.el (mouse-wheel-obey-old-style-wheel-buttons): Simplify |
Date: |
Sat, 20 Jan 2024 23:12:45 -0500 (EST) |
branch: master
commit eca7368039d841993ba649bc144017598592fa56
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/mwheel.el (mouse-wheel-obey-old-style-wheel-buttons): Simplify
---
lisp/mwheel.el | 11 +----------
1 file changed, 1 insertion(+), 10 deletions(-)
diff --git a/lisp/mwheel.el b/lisp/mwheel.el
index fc1f8e8b6d6..d3cdab87e84 100644
--- a/lisp/mwheel.el
+++ b/lisp/mwheel.el
@@ -56,16 +56,7 @@
(bound-and-true-p mouse-wheel-mode))
(mouse-wheel-mode 1)))
-(defvar mouse-wheel-obey-old-style-wheel-buttons
- ;; FIXME: Yuck!
- (if (or (featurep 'w32-win) (featurep 'ns-win)
- (featurep 'haiku-win) (featurep 'pgtk-win)
- (featurep 'android-win))
- (if (featurep 'xinput2)
- nil
- (unless (featurep 'x)
- t))
- t)
+(defvar mouse-wheel-obey-old-style-wheel-buttons t
"If non-nil, treat mouse-4/5/6/7 events as mouse wheel events.
These are the event names used historically in X11 before XInput2.
They are sometimes generated by things like `xterm-mouse-mode' as well.")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master eca7368039d: * lisp/mwheel.el (mouse-wheel-obey-old-style-wheel-buttons): Simplify,
Stefan Monnier <=