Avoid focus and allow monospace text in tooltip frames on Haiku

* src/haikufns.c (Fx_show_tip): Set avoid focus on tooltip
frames.

* src/haikuterm.c (haiku_default_font_parameter): Don't special
case the default font on tooltip frames, since the bug that was
supposed to work around has already been fixed.

diff --git a/src/haikufns.c b/src/haikufns.c
index 52bb13bc89b80446ec1af3fe79f29e24c5817f9f..6a5fdf55485d3bf213906b84e6d9b44ac95c768a 100644 (file)
--- a/src/haikufns.c
+++ b/src/haikufns.c
@@ -2001,6 +2001,7 @@ DEFUN ("x-show-tip", Fx_show_tip, Sx_show_tip, 1, 6, 0,
   BWindow_resize (FRAME_HAIKU_WINDOW (tip_f), width, height);
   haiku_set_offset (tip_f, root_x, root_y, 1);
   BWindow_set_tooltip_decoration (FRAME_HAIKU_WINDOW (tip_f));
+  BWindow_set_avoid_focus (FRAME_HAIKU_WINDOW (tip_f), true);
   BView_set_view_cursor (FRAME_HAIKU_VIEW (tip_f),
                         FRAME_OUTPUT_DATA (XFRAME (frame))->current_cursor);
   SET_FRAME_VISIBLE (tip_f, 1);

diff --git a/src/haikuterm.c b/src/haikuterm.c
index ad89985b748ab732fbf7919924177a96856904cc..7380420e531dfc41614a5db524aa80c62ef61d8d 100644 (file)
--- a/src/haikuterm.c
+++ b/src/haikuterm.c
@@ -2479,10 +2479,7 @@ haiku_default_font_parameter (struct frame *f, Lisp_Object parms)
       struct haiku_font_pattern ptn;
       ptn.specified = 0;
 
-      if (f->tooltip)
-       BFont_populate_plain_family (&ptn);
-      else
-       BFont_populate_fixed_family (&ptn);
+      BFont_populate_fixed_family (&ptn);
 
       if (ptn.specified & FSPEC_FAMILY)
        font = font_open_by_name (f, build_unibyte_string (ptn.family));