mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(Fsingle_key_description): Fix previous change.

Browse source
This commit is contained in:
Richard M. Stallman 1998-11-28 22:16:09 +00:00
parent 8b56e02dd5
commit f49770515b
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/keymap.c
View file

@ -1860,11 +1860,12 @@ Control characters turn into C-whatever, etc.")
if (INTEGERP (key)) /* Normal character */
{
unsigned int charset, c1, c2;
int without_bits = XINT (key) & ~((-1) << CHARACTERBITS);
if (SINGLE_BYTE_CHAR_P (XINT (key)))
if (SINGLE_BYTE_CHAR_P (without_bits))
charset = 0;
else
SPLIT_NON_ASCII_CHAR (XINT (key), charset, c1, c2);
SPLIT_NON_ASCII_CHAR (without_bits, charset, c1, c2);
if (charset
&& ((c1 >= 0 && c1 < 32)