comparison src/keyboard.c @ 22989:c7c48ac2e34b

(read_char): Don't decrement this_command_key_count when saving it.
author Richard M. Stallman <rms@gnu.org>
date Mon, 10 Aug 1998 07:22:21 +0000
parents 58a8427745ec
children fc5f85abc044
comparison
equal deleted inserted replaced
22988:618d123d5dd3 22989:c7c48ac2e34b
2361 && ! NILP (Vinput_method_function) 2361 && ! NILP (Vinput_method_function)
2362 && (unsigned) XINT (c) >= ' ' 2362 && (unsigned) XINT (c) >= ' '
2363 && (unsigned) XINT (c) < 127) 2363 && (unsigned) XINT (c) < 127)
2364 { 2364 {
2365 Lisp_Object keys; 2365 Lisp_Object keys;
2366 int key_count = this_command_key_count - 1; 2366 int key_count = this_command_key_count;
2367 int saved = current_kboard->immediate_echo; 2367 int saved = current_kboard->immediate_echo;
2368 struct gcpro gcpro1; 2368 struct gcpro gcpro1;
2369 2369
2370 keys = Fcopy_sequence (this_command_keys); 2370 keys = Fcopy_sequence (this_command_keys);
2371 GCPRO1 (keys); 2371 GCPRO1 (keys);