(Flookup_key): Check INTEGERP before XINT.

diff --git a/src/keymap.c b/src/keymap.c
index 4062ff34ee98c80a889872ff23b7823a8b203aa8..99883415914183ee32a06516236df4ca4f9fd963 100644 (file)
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1240,7 +1240,7 @@ recognize the default bindings, just as `read-key-sequence' does.  */)
        c = Fevent_convert_list (c);
 
       /* Turn the 8th bit of string chars into a meta modifier.  */
-      if (XINT (c) & 0x80 && STRINGP (key))
+      if (INTEGERP (c) && XINT (c) & 0x80 && STRINGP (key))
        XSETINT (c, (XINT (c) | meta_modifier) & ~0x80);
 
       /* Allow string since binding for `menu-bar-select-buffer'