diff options
| author | Karl Heuer | 1994-06-07 02:32:54 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-06-07 02:32:54 +0000 |
| commit | a3b14a452547fb0e4957fc057685af6a3600a108 (patch) | |
| tree | e893341d1004333a294b5ab6c95879fd02c5328e /src | |
| parent | 267ad509d7d9f5693c1cf891452225c682845696 (diff) | |
| download | emacs-a3b14a452547fb0e4957fc057685af6a3600a108.tar.gz emacs-a3b14a452547fb0e4957fc057685af6a3600a108.zip | |
(Fy_or_n_p, Fyes_or_no_p) [HAVE_X_MENU]: Redisplay before popping up a menu.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 2 insertions, 0 deletions
| @@ -1136,6 +1136,7 @@ Also accepts Space to mean yes, or Delete to mean no.") | |||
| 1136 | && using_x_p ()) | 1136 | && using_x_p ()) |
| 1137 | { | 1137 | { |
| 1138 | Lisp_Object pane, menu; | 1138 | Lisp_Object pane, menu; |
| 1139 | redisplay_preserve_echo_area (); | ||
| 1139 | pane = Fcons (Fcons (build_string ("Yes"), Qt), | 1140 | pane = Fcons (Fcons (build_string ("Yes"), Qt), |
| 1140 | Fcons (Fcons (build_string ("No"), Qnil), | 1141 | Fcons (Fcons (build_string ("No"), Qnil), |
| 1141 | Qnil)); | 1142 | Qnil)); |
| @@ -1238,6 +1239,7 @@ and can edit it until it as been confirmed.") | |||
| 1238 | && using_x_p ()) | 1239 | && using_x_p ()) |
| 1239 | { | 1240 | { |
| 1240 | Lisp_Object pane, menu, obj; | 1241 | Lisp_Object pane, menu, obj; |
| 1242 | redisplay_preserve_echo_area (); | ||
| 1241 | pane = Fcons (Fcons (build_string ("Yes"), Qt), | 1243 | pane = Fcons (Fcons (build_string ("Yes"), Qt), |
| 1242 | Fcons (Fcons (build_string ("No"), Qnil), | 1244 | Fcons (Fcons (build_string ("No"), Qnil), |
| 1243 | Qnil)); | 1245 | Qnil)); |