From 8d76911517ef7cefc7939845e920145ef89282f7 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 23 May 2000 02:19:20 +0000 Subject: [PATCH] (read_char): Allow character codes 128..255 to be handled by input-method-function. --- src/keyboard.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/keyboard.c b/src/keyboard.c index 990d38313f9..d08fb8bebee 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -2528,7 +2528,8 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu) 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 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu) 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; -- 2.39.5