# HG changeset patch # User Pavel Jank # Date 1017668727 0 # Node ID bc30b29aead681600fc1761815cff8399bce6e87 # Parent 1892db0064689f8085057a7160229a659554b635 Rename x_autoselect_window_p to autoselect_window_p. (note_mouse_movement): Put code for x_autoselect_window_p in #if 0. diff -r 1892db006468 -r bc30b29aead6 src/w32term.c --- a/src/w32term.c Mon Apr 01 13:43:58 2002 +0000 +++ b/src/w32term.c Mon Apr 01 13:45:27 2002 +0000 @@ -172,7 +172,7 @@ /* Non-zero means autoselect window with the mouse cursor. */ -int x_autoselect_window_p; +int autoselect_window_p; /* Non-zero means draw block and hollow cursor as wide as the glyph under it. For example, if a block cursor is over a tab, it will be @@ -6295,7 +6295,8 @@ memcpy (&last_mouse_motion_event, msg, sizeof (last_mouse_motion_event)); XSETFRAME (last_mouse_motion_frame, frame); - if (x_autoselect_window_p) +#if 0 /* Calling Lisp asynchronously is not safe. */ + if (autoselect_window_p) { int area; Lisp_Object window; @@ -6314,6 +6315,7 @@ last_window=window; } +#endif if (msg->hwnd != FRAME_W32_WINDOW (frame)) { @@ -11386,9 +11388,9 @@ staticpro (&previous_help_echo); help_echo_pos = -1; - DEFVAR_BOOL ("x-autoselect-window", &x_autoselect_window_p, + DEFVAR_BOOL ("autoselect-window", &autoselect_window_p, doc: /* *Non-nil means autoselect window with mouse pointer. */); - x_autoselect_window_p = 0; + autoselect_window_p = 0; DEFVAR_BOOL ("w32-use-visible-system-caret", &w32_use_visible_system_caret,