changeset 58519:8e7e32dcc9e2

(command_loop_1): Print a message describing the key the user just pressed when this key has no binding.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 25 Nov 2004 22:17:49 +0000
parents 1a5509ec45da
children 15989a582995
files src/ChangeLog src/keyboard.c
diffstat 2 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog	Thu Nov 25 20:01:39 2004 +0000
+++ b/src/ChangeLog	Thu Nov 25 22:17:49 2004 +0000
@@ -1,5 +1,8 @@
 2004-11-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* keyboard.c (command_loop_1): Print a message describing the key
+	the user just pressed when this key has no binding.
+
 	* sysdep.c (sys_signal): Don't use SA_RESTART if SYNC_INPUT is set.
 	(emacs_open, emacs_read, emacs_write): Check QUIT when interrupted.
 
--- a/src/keyboard.c	Thu Nov 25 20:01:39 2004 +0000
+++ b/src/keyboard.c	Thu Nov 25 22:17:49 2004 +0000
@@ -1618,7 +1618,10 @@
       if (NILP (Vthis_command))
 	{
 	  /* nil means key is undefined.  */
+	  Lisp_Object keys = Fvector (i, keybuf);
+	  keys = Fkey_description (keys, Qnil);
 	  bitch_at_user ();
+	  message_with_string ("%s is undefined", keys, 0);
 	  current_kboard->defining_kbd_macro = Qnil;
 	  update_mode_lines = 1;
 	  current_kboard->Vprefix_arg = Qnil;