mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-27 07:41:28 -08:00
Code Issues Projects Releases Wiki Activity

(Fsingle_key_description): For an invalid char, retuen

Browse source 
"Invalid char code NNNNN".
This commit is contained in:
Kenichi Handa 2006-09-26 04:17:41 +00:00
parent 25173d930b
commit 4ccaff6744
2 changed files with 14 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2006-09-26 Kenichi Handa <handa@m17n.org>
* keymap.c (Fsingle_key_description): For an invalid char, return
"Invalid char code NNNNN".
2006-09-25 Chong Yidong <cyd@stupidchicken.com>
* callint.c (Fcall_interactively): Doc fix.

12
src/keymap.c
View file

@ -2385,9 +2385,15 @@ around function keys and event symbols. */)
else
SPLIT_CHAR (without_bits, charset, c1, c2);
if (charset
&& CHAR_VALID_P (charset, 1)
&& ((c1 == 0 && c2 == -1) || c2 == 0))
if (! CHAR_VALID_P (without_bits, 1))
{
char buf[256];
sprintf (buf, "Invalid char code %d", XINT (key));
return build_string (buf);
}
else if (charset
&& ((c1 == 0 && c2 == -1) || c2 == 0))
{
/* Handle a generic character. */
Lisp_Object name;