From 2ee6621fe9ff67cd5ac4ac4e6b6f6d0c4cb6f047 Mon Sep 17 00:00:00 2001 From: Po Lu Date: Wed, 1 Dec 2021 21:54:10 +0800 Subject: [PATCH] Fix precision pixel scrolling for a recent change * lisp/pixel-scroll.el (pixel-scroll-precision-mode-map): Use `mwheel-coalesce-scroll-events' instead. --- lisp/pixel-scroll.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/pixel-scroll.el b/lisp/pixel-scroll.el index 65671534865..59b5b71b923 100644 --- a/lisp/pixel-scroll.el +++ b/lisp/pixel-scroll.el @@ -91,7 +91,7 @@ is always with pixel resolution.") (defvar pixel-last-scroll-time 0 "Time when the last scrolling was made, in second since the epoch.") -(defvar x-coalesce-scroll-events) +(defvar mwheel-coalesce-scroll-events) (defvar pixel-scroll-precision-mode-map (let ((map (make-sparse-keymap))) @@ -490,7 +490,7 @@ precisely, according to the turning of the mouse wheel." :global t :group 'mouse :keymap pixel-scroll-precision-mode-map - (setq x-coalesce-scroll-events + (setq mwheel-coalesce-scroll-events (not pixel-scroll-precision-mode))) (provide 'pixel-scroll) -- 2.39.5