aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1997-09-17 00:53:33 +0000
committerRichard M. Stallman1997-09-17 00:53:33 +0000
commite3ee748781bf7a4f3060245cb5ef5391e3905cf1 (patch)
tree69cfd3e76e3e703d6f266c3e0905fe69bcb82674 /src
parentbea3ec88ac5106aa11c37409ad8c1ca375167b4a (diff)
downloademacs-e3ee748781bf7a4f3060245cb5ef5391e3905cf1.tar.gz
emacs-e3ee748781bf7a4f3060245cb5ef5391e3905cf1.zip
(command_loop_1): Add nonascii_insert_offset
before calling direct_output_for_insert.
Diffstat (limited to 'src')
-rw-r--r--src/keyboard.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index 4c872016eb5..bf5643dba06 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -500,6 +500,8 @@ int timers_run;
500 500
501extern Lisp_Object Vprint_level, Vprint_length; 501extern Lisp_Object Vprint_level, Vprint_length;
502 502
503extern nonascii_insert_offset;
504
503/* Address (if not 0) of EMACS_TIME to zero out if a SIGIO interrupt 505/* Address (if not 0) of EMACS_TIME to zero out if a SIGIO interrupt
504 happens. */ 506 happens. */
505EMACS_TIME *input_available_clear_time; 507EMACS_TIME *input_available_clear_time;
@@ -1369,6 +1371,13 @@ command_loop_1 ()
1369 = window_display_table (XWINDOW (selected_window)); 1371 = window_display_table (XWINDOW (selected_window));
1370 int lose = c; 1372 int lose = c;
1371 1373
1374 /* Add the offset to the character, for Finsert_char.
1375 We pass internal_self_insert the unmodified character
1376 because it itself does this offsetting. */
1377 if (lose >= 0200 && lose <= 0377
1378 && ! NILP (current_buffer->enable_multibyte_characters))
1379 lose += nonascii_insert_offset;
1380
1372 if (dp) 1381 if (dp)
1373 { 1382 {
1374 Lisp_Object obj; 1383 Lisp_Object obj;