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