changeset 27890:91be3fa84ccb

(init_environment): Set Vw32_num_mouse_buttons here.
author Jason Rumney <jasonr@gnu.org>
date Sun, 27 Feb 2000 21:28:38 +0000
parents 51d0b4b8fc6a
children 5c190782d071
files src/w32.c
diffstat 1 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/w32.c	Sun Feb 27 21:26:58 2000 +0000
+++ b/src/w32.c	Sun Feb 27 21:28:38 2000 +0000
@@ -91,6 +91,7 @@
 extern Lisp_Object Vw32_downcase_file_names;
 extern Lisp_Object Vw32_generate_fake_inodes;
 extern Lisp_Object Vw32_get_true_file_attributes;
+extern Lisp_Object Vw32_num_mouse_buttons;
 
 static char startup_dir[MAXPATHLEN];
 
@@ -787,6 +788,11 @@
     argv[0] = modname;
   }
 
+  /* Determine if there is a middle mouse button, to allow parse_button
+     to decide whether right mouse events should be mouse-2 or
+     mouse-3. */
+  XSETINT (Vw32_num_mouse_buttons, GetSystemMetrics (SM_CMOUSEBUTTONS));
+
   init_user_info ();
 }