Mercurial > hg > xemacs-beta

comparison src/dialog-x.c @ 420:41dbb7a9d5f2 r21-2-18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-18
author cvs
date Mon, 13 Aug 2007 11:24:09 +0200
parents 697ef44129c6
children
comparison
equal deleted inserted replaced
419:66615b78f1a5 420:41dbb7a9d5f2
118 int text_field_p = 0; 118 int text_field_p = 0;
119 int allow_text_p = 1; 119 int allow_text_p = 1;
120 widget_value *prev = 0, *kids = 0; 120 widget_value *prev = 0, *kids = 0;
121 int n = 0; 121 int n = 0;
122 int count = specpdl_depth (); 122 int count = specpdl_depth ();
123 Lisp_Object wv_closure; 123 Lisp_Object wv_closure, gui_item;
124 124
125 CHECK_CONS (desc); 125 CHECK_CONS (desc);
126 CHECK_STRING (XCAR (desc)); 126 CHECK_STRING (XCAR (desc));
127 name = (char *) XSTRING_DATA (LISP_GETTEXT (XCAR (desc))); 127 name = (char *) XSTRING_DATA (LISP_GETTEXT (XCAR (desc)));
128 desc = XCDR (desc); 128 desc = XCDR (desc);
161 continue; 161 continue;
162 } 162 }
163 CHECK_VECTOR (button); 163 CHECK_VECTOR (button);
164 wv = xmalloc_widget_value (); 164 wv = xmalloc_widget_value ();
165 165
166 if (!button_item_to_widget_value (button, wv, allow_text_p, 1)) 166 gui_item = gui_parse_item_keywords (button);
167 if (!button_item_to_widget_value (gui_item, wv, allow_text_p, 1))
167 { 168 {
168 free_widget_value (wv); 169 free_widget_value (wv);
169 continue; 170 continue;
170 } 171 }
171 172