Commit a39f0477 authored by Karl Heuer's avatar Karl Heuer
Browse files

(Fx_popup_menu, Fx_popup_dialog): Use new accessor macros instead of calling

XSET directly.
parent e0c1aef2
......@@ -727,7 +727,7 @@ cached information about equivalent key sequences.")
if (mouse_position_hook)
(*mouse_position_hook) (&new_f, &bar_window, &part, &x, &y, &time);
if (new_f != 0)
XSET (window, Lisp_Frame, new_f);
XSETFRAME (window, new_f);
else
{
window = selected_window;
......@@ -918,7 +918,7 @@ on the left of the dialog box and all following items on the right.\n\
(*mouse_position_hook) (&new_f, &bar_window, &part, &x, &y, &time);
if (new_f != 0)
XSET (window, Lisp_Frame, new_f);
XSETFRAME (window, new_f);
else
window = selected_window;
#endif
......@@ -960,9 +960,9 @@ on the left of the dialog box and all following items on the right.\n\
in the middle of frame F. */
{
Lisp_Object x, y, frame, newpos;
XSET (frame, Lisp_Frame, f);
XSET (x, Lisp_Int, x_pixel_width (f) / 2);
XSET (y, Lisp_Int, x_pixel_height (f) / 2);
XSETFRAME (frame, f);
XSETINT (x, x_pixel_width (f) / 2);
XSETINT (y, x_pixel_height (f) / 2);
newpos = Fcons (Fcons (x, Fcons (y, Qnil)), Fcons (frame, Qnil));
return Fx_popup_menu (newpos,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment