[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/msdos.c
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] Changes to emacs/src/msdos.c |
Date: |
Sat, 16 Feb 2002 10:41:30 -0500 |
Index: emacs/src/msdos.c
diff -c emacs/src/msdos.c:1.160 emacs/src/msdos.c:1.161
*** emacs/src/msdos.c:1.160 Mon Feb 11 02:14:56 2002
--- emacs/src/msdos.c Sat Feb 16 10:41:30 2002
***************
*** 1196,1201 ****
--- 1196,1205 ----
static Lisp_Object help_echo_object;
static int help_echo_pos;
+ /* Non-zero means automatically select any window when the mouse
+ cursor moves into it. */
+ int x_autoselect_window_p;
+
static int mouse_preempted = 0; /* non-zero when XMenu gobbles mouse
events */
/* Set the mouse pointer shape according to whether it is in the
***************
*** 3388,3393 ****
--- 3392,3418 ----
might need to update mouse highlight. */
if (mouse_last_x != mouse_prev_x || mouse_last_y != mouse_prev_y)
{
+ if (x_autoselect_window_p)
+ {
+ int mouse_area;
+ Lisp_Object mouse_window;
+
+ mouse_window = window_from_coordinates (SELECTED_FRAME(),
+ mouse_last_x,
+ mouse_last_y,
+ &mouse_area, 0);
+ /* A window will be selected only when it is not
+ selected now and last mouse movement event was not in
+ it. A minubuffer window will be selected iff it is
+ active. */
+ if (!EQ (mouse_window, selected_window)
+ && (!MINI_WINDOW_P (XWINDOW (mouse_window))
+ || (EQ (mouse_window, minibuf_window)
+ && minibuf_level > 0)))
+ {
+ Fselect_window (mouse_window);
+ }
+ }
previous_help_echo = help_echo;
help_echo = help_echo_object = help_echo_window = Qnil;
help_echo_pos = -1;
***************
*** 5315,5320 ****
--- 5340,5349 ----
This variable is used only by MSDOS terminals. */);
Vdos_unsupported_char_glyph = '\177';
+
+ DEFVAR_BOOL ("x-autoselect-window", &x_autoselect_window_p,
+ doc: /* *Non-nil means autoselect window with mouse pointer. */);
+ x_autoselect_window_p = 0;
#endif
#ifndef subprocesses
DEFVAR_BOOL ("delete-exited-processes", &delete_exited_processes,