Make sure the cursor can't move on top of a tooltip on Haiku

* src/haikuterm.c (haiku_read_socket): Work around leave
notification events not being sent on tooltip frames.

1 files changed, 13 insertions, 1 deletions

diff --git a/src/haikuterm.c b/src/haikuterm.c
index 0c7e08585e7..117d8df2e56 100644
--- a/src/haikuterm.c
+++ b/src/haikuterm.c
@@ -2730,9 +2730,21 @@ haiku_read_socket (struct terminal *terminal, struct input_event *hold_quit)
             struct frame *f = haiku_window_to_frame (b->window);
             Mouse_HLInfo *hlinfo = &x_display_list->mouse_highlight;
 
-            if (!f || FRAME_TOOLTIP_P (f))
+            if (!f)
               continue;
 
+            if (FRAME_TOOLTIP_P (f))
+              {
+                /* Dismiss the tooltip if the mouse moves onto a
+                   tooltip frame.  FIXME: for some reason we don't get
+                   leave notification events for this.  */
+
+                if (any_help_event_p)
+                  do_help = -1;
+
+                break;
+              }
+
             Lisp_Object frame;
             XSETFRAME (frame, f);