From: Po Lu <luangruo@yahoo.com>
Date: Wed, 1 Dec 2021 13:54:10 +0000 (+0800)
Subject: Fix precision pixel scrolling for a recent change
X-Git-Tag: emacs-29.0.90~3630^2~18
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2ee6621fe9ff67cd5ac4ac4e6b6f6d0c4cb6f047;p=emacs.git

Fix precision pixel scrolling for a recent change

* lisp/pixel-scroll.el (pixel-scroll-precision-mode-map): Use
`mwheel-coalesce-scroll-events' instead.
---

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)