Mercurial > hg > xemacs-beta

comparison src/event-Xt.c @ 8:4b173ad71786 r19-15b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b5
author cvs
date Mon, 13 Aug 2007 08:47:35 +0200
parents ac2d302a0011
children 9ee227acff29
comparison
equal deleted inserted replaced
7:c153ca296910 8:4b173ad71786
675 */ 675 */
676 if ((((unsigned int) keysym) & (~0xFF)) == ((unsigned int) 0xFF00)) 676 if ((((unsigned int) keysym) & (~0xFF)) == ((unsigned int) 0xFF00))
677 { 677 {
678 char buf [255]; 678 char buf [255];
679 char *s1, *s2; 679 char *s1, *s2;
680 for (s1 = name, s2 = buf; *s1; s1++, s2++) 680 for (s1 = name, s2 = buf; *s1; s1++, s2++) {
681 *s2 = tolower (* (unsigned char *) s1); 681 if (*s1 == '_') {
682 *s2 = '-';
683 } else {
684 *s2 = tolower (* (unsigned char *) s1);
685 }
686 }
682 *s2 = 0; 687 *s2 = 0;
683 return (KEYSYM (buf)); 688 return (KEYSYM (buf));
684 } 689 }
685 return (KEYSYM (name)); 690 return (KEYSYM (name));
686 } 691 }