# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1007204973 0
# Node ID 33ba14e9c09a8b0f828cf435aaa57d24dec00253
# Parent  fb0e629655edd39166bf0e2c32e75d8d0331788e
(w32_read_socket) <WM_MOUSELEAVE>: Cancel help echo
and mouse face.

diff -r fb0e629655ed -r 33ba14e9c09a src/w32term.c
--- a/src/w32term.c	Sat Dec 01 01:51:51 2001 +0000
+++ b/src/w32term.c	Sat Dec 01 11:09:33 2001 +0000
@@ -8916,6 +8916,36 @@
 	  check_visibility = 1;
 	  break;
 
+	case WM_MOUSELEAVE:
+	  f = x_any_window_to_frame (dpyinfo, msg.msg.hwnd);
+	  if (f)
+	    {
+	      if (f == dpyinfo->mouse_face_mouse_frame)
+		{
+		  /* If we move outside the frame, then we're
+		     certainly no longer on any text in the frame.  */
+		  clear_mouse_face (dpyinfo);
+		  dpyinfo->mouse_face_mouse_frame = 0;
+		}
+
+	      /* Generate a nil HELP_EVENT to cancel a help-echo.
+		 Do it only if there's something to cancel.
+		 Otherwise, the startup message is cleared when
+		 the mouse leaves the frame.  */
+	      if (any_help_event_p)
+		{
+		  Lisp_Object frame;
+		  int n;
+
+		  XSETFRAME (frame, f);
+		  help_echo = Qnil;
+		  n = gen_help_event (bufp, numchars,
+				      Qnil, frame, Qnil, Qnil, 0);
+		  bufp += n, count += n, numchars -= n;
+		}
+	    }
+	  break;
+	      
 	case WM_SETFOCUS:
 	  f = x_any_window_to_frame (dpyinfo, msg.msg.hwnd);