comparison src/gui-x.c @ 306:9ea74add5d37 r21-0b51

Import from CVS: tag r21-0b51
author cvs
date Mon, 13 Aug 2007 10:41:58 +0200
parents e11d67e05968
children 58bac07dfa74
comparison
equal deleted inserted replaced
305:18920a7e9a86 306:9ea74add5d37
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 }