changeset 45122:dc0578719cf6

(make_lispy_event) <mouse-wheel>: Set count to 1 for event-click-count.
author Jason Rumney <jasonr@gnu.org>
date Sat, 04 May 2002 22:13:53 +0000
parents 6251eb510a3d
children 7648ca9b6024
files src/keyboard.c
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Sat May 04 15:42:34 2002 +0000
+++ b/src/keyboard.c	Sat May 04 22:13:53 2002 +0000
@@ -5285,8 +5285,10 @@
 				      &mouse_wheel_syms, 1);
 	  return Fcons (head,
 			Fcons (position,
-			       Fcons (make_number (event->code),
-				      Qnil)));
+			       /* Insert 1 here so event-click-count works.  */
+			       Fcons (make_number (1),
+				      Fcons (make_number (event->code),
+					     Qnil))));
 	}
       }
 #endif /* WINDOWSNT */