Mercurial > hg > xemacs-beta
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 } |