From: Dave Love <fx@gnu.org>
Date: Thu, 5 Sep 2002 16:59:35 +0000 (+0000)
Subject: (read_key_sequence): Fix type error.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~373
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c23cad0bc68b679f16bf16986392ab07872f95b7;p=emacs.git

(read_key_sequence): Fix type error.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index ba1705446ab..a578c05e3bc 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -8959,7 +8959,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last,
       if (first_binding == nmaps && ! function_key_possible
 	  && ! key_translation_possible
 	  && INTEGERP (key)
-	  && ((CHARACTERP (XINT (key) & ~CHAR_MODIFIER_MASK)
+	  && ((CHARACTERP (make_number (XINT (key) & ~CHAR_MODIFIER_MASK))
 	       && UPPERCASEP (XINT (key) & ~CHAR_MODIFIER_MASK))
 	      || (XINT (key) & shift_modifier)))
 	{