Mercurial > hg > xemacs-beta
diff src/objects-msw.c @ 239:41f2f0e326e9 r20-5b18
Import from CVS: tag r20-5b18
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:15:48 +0200 |
parents | 557eaa0339bf |
children | f220cc83d72e |
line wrap: on
line diff
--- a/src/objects-msw.c Mon Aug 13 10:15:04 2007 +0200 +++ b/src/objects-msw.c Mon Aug 13 10:15:48 2007 +0200 @@ -724,7 +724,10 @@ { if (c >= 'a' && c <= 'f') return c-'a' + 10; - return c-'0'; + else if (c >= 'A' && c <= 'Z') + return c-'A' + 10; + else + return c-'0'; } @@ -744,7 +747,6 @@ { if (!isxdigit(name[i])) return(-1); - name[i] = tolower(name[i]); } r = hexval(name[1]) * 16 + hexval(name[2]); g = hexval(name[3]) * 16 + hexval(name[4]);