Mercurial > emacs

diff src/keymap.c @ 109601:0a12f74cc5d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* src/keymap.c (Fdefine_key, Flookup_key): Say what event is invalid.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 01 Aug 2010 02:14:14 +0200
parents 228a5fa4eda0
children c4c8e4a16194
line wrap: on
line diff
--- a/src/keymap.c	Sat Jul 31 17:26:56 2010 -0400
+++ b/src/keymap.c	Sun Aug 01 02:14:14 2010 +0200
@@ -1226,7 +1226,7 @@
 	  && (!CONSP (c)
 	      /* If C is a range, it must be a leaf.  */
 	      || (INTEGERP (XCAR (c)) && idx != length)))
-	error ("Key sequence contains invalid event");
+	message_with_string ("Key sequence contains invalid event %s", c, 1);
 
       if (idx == length)
 	RETURN_UNGCPRO (store_in_keymap (keymap, c, def));
@@ -1340,7 +1340,7 @@
       /* Allow string since binding for `menu-bar-select-buffer'
 	 includes the buffer name in the key sequence.  */
       if (!INTEGERP (c) && !SYMBOLP (c) && !CONSP (c) && !STRINGP (c))
-	error ("Key sequence contains invalid event");
+	message_with_string ("Key sequence contains invalid event %s", c, 1);
 
       cmd = access_keymap (keymap, c, t_ok, 0, 1);
       if (idx == length)