diff src/xmenu.c @ 83010:82554ed1aed8

Merged in changes from CVS HEAD Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-22 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-23 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-24 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-25 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-26 Fix permission bogosities * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-27 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-28 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-29 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-30 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-50
author Karoly Lorentey <lorentey@elte.hu>
date Sat, 10 Jan 2004 13:27:38 +0000
parents 7900111db01c ed3e26153ee9
children 4c6128c0d7e2
line wrap: on
line diff
--- a/src/xmenu.c	Sat Jan 10 12:56:22 2004 +0000
+++ b/src/xmenu.c	Sat Jan 10 13:27:38 2004 +0000
@@ -1092,6 +1092,12 @@
     CHECK_STRING (title);
     record_unwind_protect (unuse_menu_items, Qnil);
 
+    if (NILP (Fcar (Fcdr (contents))))
+      /* No buttons specified, add an "Ok" button so users can pop down
+         the dialog.  Also, the lesstif/motif version crashes if there are
+         no buttons.  */
+      contents = Fcons (title, Fcons (Fcons (build_string ("Ok"), Qt), Qnil));
+    
     list_of_panes (Fcons (contents, Qnil));
 
     /* Display them in a dialog box.  */