Avoid accidental yanking of text while scrolling with
authorKim F. Storm <storm@cua.dk>
Thu, 28 Nov 2002 23:03:30 +0000 (23:03 +0000)
committerKim F. Storm <storm@cua.dk>
Thu, 28 Nov 2002 23:03:30 +0000 (23:03 +0000)
commitd09696f73f17c4ae0bf09e8c72ef7f427f07d31b
tree76d1cc7880b2a1a1cfa457ae8ad75903a59e3b8c
parent30590488e05be985cd01c76e4cf6d35a00aa11d9
Avoid accidental yanking of text while scrolling with
the mouse wheel.  This adds a short period after each mouse wheel
scroll event where a click on the mouse wheel button is ignored.

(mouse-wheel-click-event, mouse-wheel-inhibit-click-time): New customs.
(mouse-wheel-click-button, mwheel-inhibit-click-event-timer): New vars.
(mwheel-inhibit-click-timeout,mwheel-filter-click-events): New defuns.
(mwheel-scroll): Add mwheel-filter-click-events as pre-command-hook.
Start mwheel-inhibit-click-event-timer with timeout handler
mwheel-inhibit-click-timeout.
lisp/mwheel.el