Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 18:37:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

(BUILD_CHAR_GLYPH): New macro.

Browse source 
(IT_menu_display): Use it instead of SET_CHAR_GLYPH to construct the menu.
This commit is contained in:
Eli Zaretskii 2008-08-31 19:41:40 +00:00
parent 87e204a263
commit e52ab6c932
2 changed files with 29 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/ChangeLog
View file

@ -1,3 +1,10 @@
2008-08-31 Eli Zaretskii <eliz@gnu.org>
* msdos.c (BUILD_CHAR_GLYPH): New macro.
(IT_menu_display): Use it instead of SET_CHAR_GLYPH to construct
the menu. Allocate larger buffer for `text', to account for
possible ^C characters.
2008-08-31 Martin Rudalics <rudalics@gmx.at>
* xdisp.c (prepare_menu_bars): Don't call

30
src/msdos.c
View file

@ -3542,6 +3542,15 @@ IT_menu_calc_size (XMenu *menu, int *width, int *height)
/* Display MENU at (X,Y) using FACES. */
#define BUILD_CHAR_GLYPH(GLYPH, CODE, FACE_ID, PADDING_P) \
do \
{ \
(GLYPH).type = CHAR_GLYPH; \
SET_CHAR_GLYPH ((GLYPH), CODE, FACE_ID, PADDING_P); \
(GLYPH).charpos = -1; \
} \
while (0)
static void
IT_menu_display (XMenu *menu, int y, int x, int pn, int *faces, int disp_help)
{
@ -3553,7 +3562,9 @@ IT_menu_display (XMenu *menu, int y, int x, int pn, int *faces, int disp_help)
menu_help_message = NULL;
width = menu->width;
text = (struct glyph *) xmalloc ((width + 2) * sizeof (struct glyph));
/* We multiply width by 2 to account for possible control characters.
FIXME: cater to non-ASCII characters in menus. */
text = (struct glyph *) xmalloc ((width * 2 + 2) * sizeof (struct glyph));
ScreenGetCursor (&row, &col);
mouse_get_xy (&mx, &my);
IT_update_begin (sf);
@ -3564,7 +3575,7 @@ IT_menu_display (XMenu *menu, int y, int x, int pn, int *faces, int disp_help)
IT_cursor_to (sf, y + i, x);
enabled
= (!menu->submenu[i] && menu->panenumber[i]) || (menu->submenu[i]);
mousehere = (y + i == my && x <= mx && mx < x + width + 2);
mousehere = (y + i == my && x <= mx && mx < x + max_width);
face = faces[enabled + mousehere * 2];
/* The following if clause means that we display the menu help
strings even if the menu item is currently disabled. */
@ -3575,21 +3586,22 @@ IT_menu_display (XMenu *menu, int y, int x, int pn, int *faces, int disp_help)
menu_help_itemno = i;
}
p = text;
SET_CHAR_GLYPH (*p, ' ', face, 0);
BUILD_CHAR_GLYPH (*p, ' ', face, 0);
p++;
for (j = 0, q = menu->text[i]; *q; j++)
{
if (*q > 26)
{
SET_CHAR_GLYPH (*p, *q++, face, 0);
BUILD_CHAR_GLYPH (*p, *q++, face, 0);
p++;
}
else /* make '^x' */
{
SET_CHAR_GLYPH (*p, '^', face, 0);
/* FIXME: need to handle non-ASCII characters! */
BUILD_CHAR_GLYPH (*p, '^', face, 0);
p++;
j++;
SET_CHAR_GLYPH (*p, *q++ + 64, face, 0);
BUILD_CHAR_GLYPH (*p, *q++ + 64, face, 0);
p++;
}
}
@ -3600,9 +3612,11 @@ IT_menu_display (XMenu *menu, int y, int x, int pn, int *faces, int disp_help)
text[max_width - 1].u.ch = '$'; /* indicate it's truncated */
}
for (; j < max_width - 2; j++, p++)
SET_CHAR_GLYPH (*p, ' ', face, 0);
BUILD_CHAR_GLYPH (*p, ' ', face, 0);
SET_CHAR_GLYPH (*p, menu->submenu[i] ? 16 : ' ', face, 0);
/* FIXME: should use Unicode codepoint for what Emacs 22.x
displayed here. */
BUILD_CHAR_GLYPH (*p, menu->submenu[i] ? '>' : ' ', face, 0);
p++;
IT_write_glyphs (sf, text, max_width);
}