From: Richard M. Stallman Date: Wed, 11 Oct 1995 17:18:51 +0000 (+0000) Subject: (command_loop_1): Access display tables as char-tables. X-Git-Tag: emacs-19.34~2671 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=51ad8a6883f6c4705e322ea505755e313f16a987;p=emacs.git (command_loop_1): Access display tables as char-tables. --- diff --git a/src/keyboard.c b/src/keyboard.c index 23ab91f9745..019b0d2597b 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -1256,7 +1256,7 @@ command_loop_1 () do them directly. */ if (EQ (this_command, Qforward_char) && PT < ZV) { - struct Lisp_Vector *dp + struct Lisp_Char_Table *dp = window_display_table (XWINDOW (selected_window)); lose = FETCH_CHAR (PT); SET_PT (PT + 1); @@ -1279,7 +1279,7 @@ command_loop_1 () } else if (EQ (this_command, Qbackward_char) && PT > BEGV) { - struct Lisp_Vector *dp + struct Lisp_Char_Table *dp = window_display_table (XWINDOW (selected_window)); SET_PT (PT - 1); lose = FETCH_CHAR (PT); @@ -1335,7 +1335,7 @@ command_loop_1 () if (!lose && (PT == ZV || FETCH_CHAR (PT) == '\n')) { - struct Lisp_Vector *dp + struct Lisp_Char_Table *dp = window_display_table (XWINDOW (selected_window)); int lose = c;