Mercurial > hg > xemacs-beta
diff src/dialog.c @ 412:697ef44129c6 r21-2-14
Import from CVS: tag r21-2-14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:20:41 +0200 |
parents | 2f8bb876ab1d |
children |
line wrap: on
line diff
--- a/src/dialog.c Mon Aug 13 11:19:22 2007 +0200 +++ b/src/dialog.c Mon Aug 13 11:20:41 2007 +0200 @@ -21,6 +21,9 @@ /* Synched up with: Not in FSF. */ +/* #### There ain't nothin' here because dialog boxes have not been + properly abstracted yet. */ + #include <config.h> #include "lisp.h" #include "frame.h" @@ -45,11 +48,6 @@ resource database, so it is possible for resources to override what string is actually displayed. -Accelerators can be indicated in the string by putting the sequence -"%_" before the character corresponding to the key that will invoke -the button. Uppercase and lowercase accelerators are equivalent. The -sequence "%%" is also special, and is translated into a single %. - If the `callback' of a button is a symbol, then it must name a command. It will be invoked with `call-interactively'. If it is a list, then it is evaluated with `eval'. @@ -59,7 +57,8 @@ Though the keyword/value syntax is supported for dialog boxes just as in popup menus, the only keyword which is both meaningful and fully implemented -for dialog box buttons is `:active'. */ +for dialog box buttons is `:active'. +*/ (dbox_desc)) { struct frame *f = selected_frame (); @@ -73,8 +72,7 @@ CHECK_CONS (dbox_desc); CHECK_STRING (XCAR (dbox_desc)); if (!CONSP (XCDR (dbox_desc))) - signal_simple_error ("Dialog descriptor must supply at least one button", - dbox_desc); + signal_simple_error ("Dialog descriptor must supply at least one button", dbox_desc); DEVMETH (d, popup_dialog_box, (f, dbox_desc));