# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1052045854 0
# Node ID a0bea8c8fe5a919bd4866829fa2eec50fbe4293b
# Parent  cbc775fd6d6a83dc11048f0f7b1db77a04d43edc
(read_emacs_mule_char) [len==2]: Index
emacs_mule_charset correctly.

diff -r cbc775fd6d6a -r a0bea8c8fe5a src/lread.c
--- a/src/lread.c	Fri May 02 14:51:18 2003 +0000
+++ b/src/lread.c	Sun May 04 10:57:34 2003 +0000
@@ -537,7 +537,7 @@
 
   if (len == 2)
     {
-      charset = emacs_mule_charset[c];
+      charset = emacs_mule_charset[buf[0];
       code = buf[1] & 0x7F;
     }
   else if (len == 3)