Mercurial > emacs
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. */