diff options
| author | Richard M. Stallman | 1994-03-19 16:20:31 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-03-19 16:20:31 +0000 |
| commit | 04b5691b3991d0dff7e1dbbc6eeb2a63719d99bc (patch) | |
| tree | a2ee83084c6572da4fd2a7e5f9c1a4c59fbdbe3d /src/fns.c | |
| parent | 80670155d2b3a50f0d7f587268e4590cb6936b23 (diff) | |
| download | emacs-04b5691b3991d0dff7e1dbbc6eeb2a63719d99bc.tar.gz emacs-04b5691b3991d0dff7e1dbbc6eeb2a63719d99bc.zip | |
(Fyes_or_no_p) [USE_X_TOOLKIT]: Display just one menu.
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 2 insertions, 0 deletions
| @@ -1241,12 +1241,14 @@ and can edit it until it as been confirmed.") | |||
| 1241 | GCPRO1 (pane); | 1241 | GCPRO1 (pane); |
| 1242 | menu = Fcons (prompt, Fcons (Fcons (prompt, pane), Qnil)); | 1242 | menu = Fcons (prompt, Fcons (Fcons (prompt, pane), Qnil)); |
| 1243 | obj = Fx_popup_dialog (Qt, menu); | 1243 | obj = Fx_popup_dialog (Qt, menu); |
| 1244 | #ifndef USE_X_TOOLKIT | ||
| 1244 | if (!NILP (obj)) | 1245 | if (!NILP (obj)) |
| 1245 | { | 1246 | { |
| 1246 | prompt = build_string ("Confirm"); | 1247 | prompt = build_string ("Confirm"); |
| 1247 | menu = Fcons (prompt, Fcons (Fcons (prompt, pane), Qnil)); | 1248 | menu = Fcons (prompt, Fcons (Fcons (prompt, pane), Qnil)); |
| 1248 | obj = Fx_popup_dialog (Qt, menu); | 1249 | obj = Fx_popup_dialog (Qt, menu); |
| 1249 | } | 1250 | } |
| 1251 | #endif | ||
| 1250 | UNGCPRO; | 1252 | UNGCPRO; |
| 1251 | return obj; | 1253 | return obj; |
| 1252 | } | 1254 | } |