# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 874457613 0
# Node ID 52eb1c7d37a2e330f8a9fbf5d44356a338e45c5f
# Parent  d44bb51c42b5e44cb118cdf719ab0ff64d58ad80
(command_loop_1): Add nonascii_insert_offset
before calling direct_output_for_insert.

diff -r d44bb51c42b5 -r 52eb1c7d37a2 src/keyboard.c
--- 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;