]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix precision pixel scrolling for a recent change
authorPo Lu <luangruo@yahoo.com>
Wed, 1 Dec 2021 13:54:10 +0000 (21:54 +0800)
committerPo Lu <luangruo@yahoo.com>
Wed, 1 Dec 2021 13:54:10 +0000 (21:54 +0800)
* lisp/pixel-scroll.el (pixel-scroll-precision-mode-map): Use
`mwheel-coalesce-scroll-events' instead.

lisp/pixel-scroll.el

index 65671534865e327734054bec04b4af70813f6572..59b5b71b9237e4e6e88e0fbe9a34c4d82121d913 100644 (file)
@@ -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)