From: tomo <tomo>
Date: Sat, 15 Jan 2000 11:03:59 +0000 (+0000)
Subject: (split_builtin_char): Delete builtin support for `katakana-jisx0201'.
X-Git-Tag: r21-2-19-utf-2000-0_13-0~4
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=be58f42379c9e6e79d68774f4e8d1c58ec3aa7e8;p=chise%2Fxemacs-chise.git-

(split_builtin_char): Delete builtin support for `katakana-jisx0201'.
(complex_vars_of_mule_charset): Don't map `katakana-jisx0201' to BMP
area in builtin representation.
---

diff --git a/src/mule-charset.c b/src/mule-charset.c
index 3044d66..524dfbf 100644
--- a/src/mule-charset.c
+++ b/src/mule-charset.c
@@ -1541,12 +1541,6 @@ split_builtin_char (Emchar c)
 	  return list2 (Vcharset_thai_tis620,
 			make_int (c - MIN_CHAR_THAI + 0x20));
 	}
-      else if ((MIN_CHAR_HALFWIDTH_KATAKANA <= c)
-	       && (c <= MAX_CHAR_HALFWIDTH_KATAKANA))
-	{
-	  return list2 (Vcharset_katakana_jisx0201,
-			make_int (c - MIN_CHAR_HALFWIDTH_KATAKANA + 33));
-	}
       else
 	{
 	  return list3 (Vcharset_ucs_bmp,
@@ -2797,9 +2791,7 @@ complex_vars_of_mule_charset (void)
 		  build_string ("JISX0201.1976 (Japanese Kana)"),
 		  build_string ("JISX0201.1976 Japanese Kana"),
 		  build_string ("jisx0201\\.1976"),
-		  Qnil,
-		  MIN_CHAR_HALFWIDTH_KATAKANA,
-		  MAX_CHAR_HALFWIDTH_KATAKANA, 0, 33);
+		  Qnil, 0, 0, 0, 33);
   Vcharset_latin_jisx0201 =
     make_charset (LEADING_BYTE_LATIN_JISX0201, Qlatin_jisx0201,
 		  CHARSET_TYPE_94, 1, 0, 'J',