From 20af483168612edcf22085f4701d37b9d1cc8e05 Mon Sep 17 00:00:00 2001 From: Jason Rumney Date: Sun, 27 Feb 2000 21:28:38 +0000 Subject: [PATCH] (init_environment): Set Vw32_num_mouse_buttons here. --- src/w32.c | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/w32.c b/src/w32.c index 99ac51897d1..67cf9506ad6 100644 --- a/src/w32.c +++ b/src/w32.c @@ -91,6 +91,7 @@ Boston, MA 02111-1307, USA. 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 @@ init_environment (char ** argv) 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 (); } -- 2.39.5