changeset 19947:52eb1c7d37a2

(command_loop_1): Add nonascii_insert_offset before calling direct_output_for_insert.
author Richard M. Stallman <rms@gnu.org>
date Wed, 17 Sep 1997 00:53:33 +0000
parents d44bb51c42b5
children 46e5df654a35
files src/keyboard.c
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Wed Sep 17 00:35:15 1997 +0000
+++ b/src/keyboard.c	Wed Sep 17 00:53:33 1997 +0000
@@ -500,6 +500,8 @@
 
 extern Lisp_Object Vprint_level, Vprint_length;
 
+extern nonascii_insert_offset;
+
 /* Address (if not 0) of EMACS_TIME to zero out if a SIGIO interrupt
    happens.  */
 EMACS_TIME *input_available_clear_time;
@@ -1369,6 +1371,13 @@
 			= window_display_table (XWINDOW (selected_window));
 		      int lose = c;
 
+		      /* Add the offset to the character, for Finsert_char.
+			 We pass internal_self_insert the unmodified character
+			 because it itself does this offsetting.  */
+		      if (lose >= 0200 && lose <= 0377
+			  && ! NILP (current_buffer->enable_multibyte_characters))
+			lose += nonascii_insert_offset;
+
 		      if (dp)
 			{
 			  Lisp_Object obj;