* xdisp.c (mouse_autoselect_window): Removed.

	(Vmouse_autoselect_window): New variable.  DEFVAR_LISP it.

	* dispextern.h (mouse_autoselect_window): Remove extern.
	(Vmouse_autoselect_window): Add extern.

	* macterm.c (XTread_socket): Test Vmouse_autoselect_window
	instead of mouse_autoselect_window.

	* msdos.c (dos_rawgetc): Likewise.

	* w32term.c (w32_read_socket): Likewise.

	* xterm.c (handle_one_xevent): Likewise.

diff --git a/src/ChangeLog b/src/ChangeLog
index f8a9f26d8915b6a95d49c9fb66838455774abac6..b57aab2882f1d98e0c84163a1322490494a7661d 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,20 @@
+2006-08-27  Martin Rudalics  <rudalics@gmx.at>
+
+       * xdisp.c (mouse_autoselect_window): Removed.
+       (Vmouse_autoselect_window): New variable.  DEFVAR_LISP it.
+
+       * dispextern.h (mouse_autoselect_window): Remove extern.
+       (Vmouse_autoselect_window): Add extern.
+
+       * macterm.c (XTread_socket): Test Vmouse_autoselect_window
+       instead of mouse_autoselect_window.
+
+       * msdos.c (dos_rawgetc): Likewise.
+
+       * w32term.c (w32_read_socket): Likewise.
+
+       * xterm.c (handle_one_xevent): Likewise.
+
 2006-09-08  Richard Stallman  <rms@gnu.org>
 
        * xdisp.c (Vmenu_updating_frame): Define here.

diff --git a/src/dispextern.h b/src/dispextern.h
index 6aff0dc1803c90f0b6cebc3c71c09ce5d8c98800..09a0c2dae89f7a0c54f9c0a467bb139baa0301b4 100644 (file)
--- a/src/dispextern.h
+++ b/src/dispextern.h
@@ -2690,7 +2690,7 @@ extern Lisp_Object help_echo_object, previous_help_echo_string;
 extern int help_echo_pos;
 extern struct frame *last_mouse_frame;
 extern int last_tool_bar_item;
-extern int mouse_autoselect_window;
+extern Lisp_Object Vmouse_autoselect_window;
 extern int unibyte_display_via_language_environment;
 
 extern void reseat_at_previous_visible_line_start P_ ((struct it *));

diff --git a/src/macterm.c b/src/macterm.c
index dcfa61e0ac33fa8dcede2d479bec72b7817e1ecb..98c311ff02e06bff8d73cf2540daeacc30bd5eec 100644 (file)
--- a/src/macterm.c
+++ b/src/macterm.c
@@ -10653,7 +10653,7 @@ XTread_socket (sd, expected, hold_quit)
                  else
                    {
                      /* Generate SELECT_WINDOW_EVENTs when needed.  */
-                     if (mouse_autoselect_window)
+                     if (!NILP (Vmouse_autoselect_window))
                        {
                          Lisp_Object window;
 

diff --git a/src/msdos.c b/src/msdos.c
index 2068af544ac4a7bedd12ea3c91efa607112afc5c..61e167a194611073ca1d9097e665174926df1682 100644 (file)
--- a/src/msdos.c
+++ b/src/msdos.c
@@ -3381,7 +3381,7 @@ dos_rawgetc ()
            }
 
          /* Generate SELECT_WINDOW_EVENTs when needed.  */
-         if (mouse_autoselect_window)
+         if (!NILP (Vmouse_autoselect_window))
            {
              mouse_window = window_from_coordinates (SELECTED_FRAME(),
                                                      mouse_last_x,

diff --git a/src/w32term.c b/src/w32term.c
index 93a697bbd8c55c21926bc9858c28b49752968b8e..c00fdb8923c8b1d4defdae89f208a328392c4e07 100644 (file)
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -4298,7 +4298,7 @@ w32_read_socket (sd, expected, hold_quit)
          if (f)
            {
              /* Generate SELECT_WINDOW_EVENTs when needed.  */
-             if (mouse_autoselect_window)
+             if (!NILP (Vmouse_autoselect_window))
                {
                  Lisp_Object window;
                  int x = LOWORD (msg.msg.lParam);

diff --git a/src/xdisp.c b/src/xdisp.c
index 16dbc5335573be44ade3456b871ad63e79dd2595..0a516c3976876294ccbef1a9d42d4ada4a476b35 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -256,9 +256,9 @@ Lisp_Object list_of_error;
 Lisp_Object Vfontification_functions;
 Lisp_Object Qfontification_functions;
 
-/* Non-zero means automatically select any window when the mouse
+/* Non-nil means automatically select any window when the mouse
    cursor moves into it.  */
-int mouse_autoselect_window;
+Lisp_Object Vmouse_autoselect_window;
 
 /* Non-zero means draw tool bar buttons raised when the mouse moves
    over them.  */
@@ -24019,9 +24019,22 @@ Each function is called with two arguments, the window and the end trigger value
 See `set-window-redisplay-end-trigger'.  */);
   Vredisplay_end_trigger_functions = Qnil;
 
-  DEFVAR_BOOL ("mouse-autoselect-window", &mouse_autoselect_window,
-    doc: /* *Non-nil means autoselect window with mouse pointer.  */);
-  mouse_autoselect_window = 0;
+  DEFVAR_LISP ("mouse-autoselect-window", &Vmouse_autoselect_window,
+     doc: /* *Non-nil means autoselect window with mouse pointer.
+If nil, do not autoselect windows.
+A positive number means delay autoselection by that many seconds: a
+window is autoselected only after the mouse has remained in that
+window for the duration of the delay.
+A negative number has a similar effect, but causes windows to be
+autoselected only after the mouse has stopped moving.  \(Because of
+the way Emacs compares mouse events, you will occasionally wait twice
+that time before the window gets selected.\)
+Any other value means to autoselect window instantaneously when the
+mouse pointer enters it.
+
+Autoselection selects the minibuffer only if it is active, and never
+unselects the minibuffer if it is active.  */);
+  Vmouse_autoselect_window = Qnil;
 
   DEFVAR_BOOL ("auto-resize-tool-bars", &auto_resize_tool_bars_p,
     doc: /* *Non-nil means automatically resize tool-bars.

diff --git a/src/xterm.c b/src/xterm.c
index 757a022d35c5c31b562f6b749f5bc1343dc432a1..e7a462aef58786490836670725c35fc8ab5128bd 100644 (file)
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -6583,7 +6583,7 @@ handle_one_xevent (dpyinfo, eventp, finish, hold_quit)
           {
 
             /* Generate SELECT_WINDOW_EVENTs when needed.  */
-            if (mouse_autoselect_window)
+            if (!NILP (Vmouse_autoselect_window))
               {
                 Lisp_Object window;