# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 959048360 0
# Node ID a72f4aba9f9333bc3d42c1629203b589b6eb4b8c
# Parent  c8a95c4dfd18cffed5c475465fa1c2340b8f8e57
(read_char): Allow character codes 128..255 to be
handled by input-method-function.

diff -r c8a95c4dfd18 -r a72f4aba9f93 src/keyboard.c
--- a/src/keyboard.c	Tue May 23 01:34:05 2000 +0000
+++ b/src/keyboard.c	Tue May 23 02:19:20 2000 +0000
@@ -2528,7 +2528,8 @@
   if (INTEGERP (c)
       && ! NILP (Vinput_method_function)
       && (unsigned) XINT (c) >= ' '
-      && (unsigned) XINT (c) < 127)
+      && (unsigned) XINT (c) != 127
+      && (unsigned) XINT (c) < 256)
     {
       previous_echo_area_message = Fcurrent_message ();
       Vinput_method_previous_message = previous_echo_area_message;
@@ -2552,7 +2553,8 @@
 	 after the first event of the key sequence.  */
       && NILP (prev_event)
       && (unsigned) XINT (c) >= ' '
-      && (unsigned) XINT (c) < 127)
+      && (unsigned) XINT (c) != 127
+      && (unsigned) XINT (c) < 256)
     {
       Lisp_Object keys; 
       int key_count;