comparison src/menubar-x.c @ 173:8eaf7971accc r20-3b13

Import from CVS: tag r20-3b13
author cvs
date Mon, 13 Aug 2007 09:49:09 +0200
parents 15872534500d
children 2d532a89d707
comparison
equal deleted inserted replaced
172:a38aed19690b 173:8eaf7971accc
142 widget_value *prev = 0; 142 widget_value *prev = 0;
143 143
144 if (STRINGP (XCAR (desc))) 144 if (STRINGP (XCAR (desc)))
145 { 145 {
146 Lisp_Object key, val; 146 Lisp_Object key, val;
147 Lisp_Object include_p, hook_fn = Qnil, config_tag = Qnil; 147 Lisp_Object include_p = Qnil, hook_fn = Qnil, config_tag = Qnil;
148 int included_spec = 0; 148 int included_spec = 0;
149 wv->type = CASCADE_TYPE; 149 wv->type = CASCADE_TYPE;
150 wv->enabled = 1; 150 wv->enabled = 1;
151 wv->name = (char *) XSTRING_DATA (LISP_GETTEXT (XCAR (desc))); 151 wv->name = (char *) XSTRING_DATA (LISP_GETTEXT (XCAR (desc)));
152 desc = Fcdr (desc); 152 desc = Fcdr (desc);