aboutsummaryrefslogtreecommitdiffstats
path: root/src/editfns.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/editfns.c')
-rw-r--r--src/editfns.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/editfns.c b/src/editfns.c
index c5267d1e038..8e47d1f82e4 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3473,7 +3473,6 @@ usage: (message-box FORMAT-STRING &rest ARGS) */)
3473 else 3473 else
3474 { 3474 {
3475 Lisp_Object val = Fformat (nargs, args); 3475 Lisp_Object val = Fformat (nargs, args);
3476#ifdef HAVE_MENUS
3477 Lisp_Object pane, menu; 3476 Lisp_Object pane, menu;
3478 struct gcpro gcpro1; 3477 struct gcpro gcpro1;
3479 3478
@@ -3482,9 +3481,6 @@ usage: (message-box FORMAT-STRING &rest ARGS) */)
3482 menu = Fcons (val, pane); 3481 menu = Fcons (val, pane);
3483 Fx_popup_dialog (Qt, menu, Qt); 3482 Fx_popup_dialog (Qt, menu, Qt);
3484 UNGCPRO; 3483 UNGCPRO;
3485#else /* !HAVE_MENUS */
3486 message3 (val);
3487#endif
3488 return val; 3484 return val;
3489 } 3485 }
3490} 3486}
@@ -3503,11 +3499,9 @@ message; let the minibuffer contents show.
3503usage: (message-or-box FORMAT-STRING &rest ARGS) */) 3499usage: (message-or-box FORMAT-STRING &rest ARGS) */)
3504 (ptrdiff_t nargs, Lisp_Object *args) 3500 (ptrdiff_t nargs, Lisp_Object *args)
3505{ 3501{
3506#ifdef HAVE_MENUS
3507 if ((NILP (last_nonmenu_event) || CONSP (last_nonmenu_event)) 3502 if ((NILP (last_nonmenu_event) || CONSP (last_nonmenu_event))
3508 && use_dialog_box) 3503 && use_dialog_box)
3509 return Fmessage_box (nargs, args); 3504 return Fmessage_box (nargs, args);
3510#endif
3511 return Fmessage (nargs, args); 3505 return Fmessage (nargs, args);
3512} 3506}
3513 3507