diff options
| author | Jason Rumney | 2004-05-17 21:43:22 +0000 |
|---|---|---|
| committer | Jason Rumney | 2004-05-17 21:43:22 +0000 |
| commit | e597eb7d6c2ce218faa1e060b4e0402cb0bd16a6 (patch) | |
| tree | 2a87d845b458d09cedb7dd9f5906697161ef244c | |
| parent | e0c181ddf1c5e93dead35a9017db6409255b1597 (diff) | |
| download | emacs-e597eb7d6c2ce218faa1e060b4e0402cb0bd16a6.tar.gz emacs-e597eb7d6c2ce218faa1e060b4e0402cb0bd16a6.zip | |
(w32_num_mouse_buttons): Rename from Vw32_num_mouse_buttons and make
it an int.
| -rw-r--r-- | src/w32term.c | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/src/w32term.c b/src/w32term.c index 93a3d7d61c9..71125fe4195 100644 --- a/src/w32term.c +++ b/src/w32term.c | |||
| @@ -177,7 +177,7 @@ int last_scroll_bar_drag_pos; | |||
| 177 | static RECT last_mouse_glyph; | 177 | static RECT last_mouse_glyph; |
| 178 | static Lisp_Object last_mouse_press_frame; | 178 | static Lisp_Object last_mouse_press_frame; |
| 179 | 179 | ||
| 180 | Lisp_Object Vw32_num_mouse_buttons; | 180 | int w32_num_mouse_buttons; |
| 181 | 181 | ||
| 182 | Lisp_Object Vw32_swap_mouse_buttons; | 182 | Lisp_Object Vw32_swap_mouse_buttons; |
| 183 | 183 | ||
| @@ -4360,10 +4360,16 @@ w32_read_socket (sd, expected, hold_quit) | |||
| 4360 | 4360 | ||
| 4361 | /* If the contents of the global variable help_echo_string | 4361 | /* If the contents of the global variable help_echo_string |
| 4362 | has changed, generate a HELP_EVENT. */ | 4362 | has changed, generate a HELP_EVENT. */ |
| 4363 | #if 0 /* The below is an invalid comparison when USE_LISP_UNION_TYPE. | ||
| 4364 | But it was originally changed to this to fix a bug, so I have | ||
| 4365 | not removed it completely in case the bug is still there. */ | ||
| 4363 | if (help_echo_string != previous_help_echo_string || | 4366 | if (help_echo_string != previous_help_echo_string || |
| 4364 | (!NILP (help_echo_string) && !STRINGP (help_echo_string) && f->mouse_moved)) | 4367 | (!NILP (help_echo_string) && !STRINGP (help_echo_string) && f->mouse_moved)) |
| 4368 | #else /* This is what xterm.c does. */ | ||
| 4369 | if (!NILP (help_echo_string) | ||
| 4370 | || !NILP (previous_help_echo_string)) | ||
| 4365 | do_help = 1; | 4371 | do_help = 1; |
| 4366 | 4372 | #endif | |
| 4367 | break; | 4373 | break; |
| 4368 | 4374 | ||
| 4369 | case WM_LBUTTONDOWN: | 4375 | case WM_LBUTTONDOWN: |
| @@ -4784,7 +4790,7 @@ w32_read_socket (sd, expected, hold_quit) | |||
| 4784 | 4790 | ||
| 4785 | if (do_help > 0) | 4791 | if (do_help > 0) |
| 4786 | { | 4792 | { |
| 4787 | if (help_echo_string == Qnil) | 4793 | if (NILP (help_echo_string)) |
| 4788 | { | 4794 | { |
| 4789 | help_echo_object = help_echo_window = Qnil; | 4795 | help_echo_object = help_echo_window = Qnil; |
| 4790 | help_echo_pos = -1; | 4796 | help_echo_pos = -1; |
| @@ -6459,9 +6465,9 @@ syms_of_w32term () | |||
| 6459 | Qvendor_specific_keysyms = intern ("vendor-specific-keysyms"); | 6465 | Qvendor_specific_keysyms = intern ("vendor-specific-keysyms"); |
| 6460 | 6466 | ||
| 6461 | DEFVAR_INT ("w32-num-mouse-buttons", | 6467 | DEFVAR_INT ("w32-num-mouse-buttons", |
| 6462 | &Vw32_num_mouse_buttons, | 6468 | &w32_num_mouse_buttons, |
| 6463 | doc: /* Number of physical mouse buttons. */); | 6469 | doc: /* Number of physical mouse buttons. */); |
| 6464 | Vw32_num_mouse_buttons = Qnil; | 6470 | w32_num_mouse_buttons = 2; |
| 6465 | 6471 | ||
| 6466 | DEFVAR_LISP ("w32-swap-mouse-buttons", | 6472 | DEFVAR_LISP ("w32-swap-mouse-buttons", |
| 6467 | &Vw32_swap_mouse_buttons, | 6473 | &Vw32_swap_mouse_buttons, |