From d27f3b5ec317a3022d0be42558226bc6512cab4e Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Mon, 30 Aug 1999 17:31:10 +0000
Subject: [PATCH] (get_non_ascii_char_table_value): Don't use
 `BREAKUP_CHAR_1_UNSAFE' in UTF-2000.

---
 src/chartab.c |    8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/chartab.c b/src/chartab.c
index 4e7480d..51e62ee 100644
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -771,10 +771,18 @@ get_non_ascii_char_table_value (struct Lisp_Char_Table *ct, int leading_byte,
 			       Emchar c)
 {
   Lisp_Object val;
+#ifdef UTF2000
+  Lisp_Object charset;
+#else
   Lisp_Object charset = CHARSET_BY_LEADING_BYTE (leading_byte);
+#endif
   int byte1, byte2;
 
+#ifdef UTF2000
+  BREAKUP_CHAR (c, charset, byte1, byte2);
+#else
   BREAKUP_CHAR_1_UNSAFE (c, charset, byte1, byte2);
+#endif
   val = ct->level1[leading_byte - MIN_LEADING_BYTE];
   if (CHAR_TABLE_ENTRYP (val))
     {
-- 
1.7.10.4