changeset 48573:a982201fa7a6

*** empty log message ***
author Kim F. Storm <storm@cua.dk>
date Thu, 28 Nov 2002 23:02:45 +0000
parents 67d16fb6f6c8
children 3e3b1f1265f5
files lisp/ChangeLog
diffstat 1 files changed, 12 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Nov 28 21:26:25 2002 +0000
+++ b/lisp/ChangeLog	Thu Nov 28 23:02:45 2002 +0000
@@ -1,3 +1,15 @@
+2002-11-29  Kim F. Storm  <storm@cua.dk>
+
+	* mwheel.el: 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.   
+	
 2002-11-28  Nick Roberts  <nick@nick.uklinux.net>
 
 	* tooltip.el (tooltip-gud-tips-setup): Remove.