mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-10 05:30:45 -08:00
Code Issues Projects Releases Wiki Activity

(Fx_popup_menu): Don't use Lisp_Object as integer.

Browse source 
(set_frame_menubar): Likewise.
This commit is contained in:
Karl Heuer 1997-04-10 21:19:16 +00:00
parent 10ffbb91cf
commit 99d3fac764
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/xmenu.c
View file

@ -856,8 +856,10 @@ cached information about equivalent key sequences.")
CHECK_LIVE_WINDOW (window, 0);
f = XFRAME (WINDOW_FRAME (XWINDOW (window)));
xpos = (FONT_WIDTH (f->output_data.x->font) * XWINDOW (window)->left);
ypos = (f->output_data.x->line_height * XWINDOW (window)->top);
xpos = (FONT_WIDTH (f->output_data.x->font)
* XFASTINT (XWINDOW (window)->left));
ypos = (f->output_data.x->line_height
* XFASTINT (XWINDOW (window)->top));
}
else
/* ??? Not really clean; should be CHECK_WINDOW_OR_FRAME,
@ -1733,7 +1735,7 @@ set_frame_menubar (f, first_time, deep_p)
for (i = 0; i < previous_menu_items_used; i++)
if (menu_items_used == i
|| (previous_items[i] != XVECTOR (menu_items)->contents[i]))
|| (!EQ (previous_items[i], XVECTOR (menu_items)->contents[i])))
break;
if (i == menu_items_used && i == previous_menu_items_used && i != 0)
{