From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 28 May 1998 18:10:20 +0000 (+0000)
Subject: (command_loop_1): In shortcuts for forward-char etc,,
X-Git-Tag: emacs-20.3~798
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=aaf3523422e1249eeb568236c16f21c444c35157;p=emacs.git

(command_loop_1): In shortcuts for forward-char etc,,
use FETCH_CHAR not FETCH_BYTE.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index b5a74bebf29..a3dd95e0f7d 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -1306,7 +1306,7 @@ command_loop_1 ()
 		{
                   struct Lisp_Char_Table *dp
 		    = window_display_table (XWINDOW (selected_window));
-		  lose = FETCH_BYTE (PT_BYTE);
+		  lose = FETCH_CHAR (PT_BYTE);
 		  SET_PT (PT + 1);
 		  if ((dp
 		       ? (VECTORP (DISP_CHAR_VECTOR (dp, lose))
@@ -1336,7 +1336,7 @@ command_loop_1 ()
                   struct Lisp_Char_Table *dp
 		    = window_display_table (XWINDOW (selected_window));
 		  SET_PT (PT - 1);
-		  lose = FETCH_BYTE (PT_BYTE);
+		  lose = FETCH_CHAR (PT_BYTE);
 		  if ((dp
 		       ? (VECTORP (DISP_CHAR_VECTOR (dp, lose))
 			  ? XVECTOR (DISP_CHAR_VECTOR (dp, lose))->size == 1