diff options
| author | Po Lu <luangruo@yahoo.com> | 2022-01-16 05:57:14 +0000 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2022-01-16 05:59:39 +0000 |
| commit | 9b308a333bcb5cc040cb09d0d676ed5d260f0920 (patch) | |
| tree | 536f1b35a0b9bd821a6540541c81b13397700de4 | |
| parent | 19d681d24bce0bcff1417c73035d1f9e34fbcc4a (diff) | |
| download | emacs-9b308a333bcb5cc040cb09d0d676ed5d260f0920.tar.gz | |
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.
| -rw-r--r-- | src/haikufns.c | 1 | ||||
| -rw-r--r-- | src/haikuterm.c | 5 |
2 files changed, 2 insertions, 4 deletions
diff --git a/src/haikufns.c b/src/haikufns.c index 52bb13bc89b..6a5fdf55485 100644 --- 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 ad89985b748..7380420e531 100644 --- 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)); |