diff options
| author | Karl Heuer <[email protected]> | 1994-10-04 19:47:37 +0000 |
|---|---|---|
| committer | Karl Heuer <[email protected]> | 1994-10-04 19:47:37 +0000 |
| commit | a39f04772bd0235d7dcc4c131f24e4202b86e2e2 (patch) | |
| tree | 54f7d87e8c1945bd29b0b5128c9bf1956f20b89e /src/xmenu.c | |
| parent | e0c1aef22bc59c2c7871846d1231b68fe4abb6c3 (diff) | |
(Fx_popup_menu, Fx_popup_dialog): Use new accessor macros instead of calling
XSET directly.
Diffstat (limited to 'src/xmenu.c')
| -rw-r--r-- | src/xmenu.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/xmenu.c b/src/xmenu.c index 42b2e118c3..4a06c2c1b8 100644 --- a/src/xmenu.c +++ b/src/xmenu.c @@ -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, |