comparison src/gui-x.c @ 373:6240c7796c7a r21-2b2

Import from CVS: tag r21-2b2
author cvs
date Mon, 13 Aug 2007 11:04:06 +0200
parents cc15677e0335
children 8626e4521993
comparison
equal deleted inserted replaced
372:49e1ed2d7ed8 373:6240c7796c7a
322 while (*name) { 322 while (*name) {
323 if (*name=='%') { 323 if (*name=='%') {
324 ++name; 324 ++name;
325 if (!(*name)) 325 if (!(*name))
326 return Qnil; 326 return Qnil;
327 if (*name=='_'&&*(name+1)) 327 if (*name=='_' && *(name+1))
328 return make_char (tolower(*(name+1))); 328 {
329 int accelerator = (int) (unsigned char) (*(name+1));
330 return make_char (tolower (accelerator));
331 }
329 } 332 }
330 ++name; 333 ++name;
331 } 334 }
332 return Qnil; 335 return Qnil;
333 } 336 }