From: Kenichi Handa <handa@m17n.org>
Date: Thu, 16 Apr 2009 01:04:27 +0000 (+0000)
Subject: (charset_ksc5601): New variable.
X-Git-Tag: emacs-pretest-23.0.93~121
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d32320c43de511275b5164696fb80867710fc2b8;p=emacs.git

(charset_ksc5601): New variable.
(Fdefine_charset_internal): Set charset_ksc5601.
(init_charset_once): Initialize charset_ksc5601 to -1.
---

diff --git a/src/charset.c b/src/charset.c
index bfe34686629..15975a4ebf6 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -87,6 +87,7 @@ int charset_emacs;
 int charset_jisx0201_roman;
 int charset_jisx0208_1978;
 int charset_jisx0208;
+int charset_ksc5601;
 
 /* Value of charset attribute `charset-iso-plane'.  */
 Lisp_Object Qgl, Qgr;
@@ -1224,6 +1225,8 @@ usage: (define-charset-internal ...)  */)
 	charset_jisx0208_1978 = id;
       else if (ISO_CHARSET_TABLE (2, 0, 'B') == id)
 	charset_jisx0208 = id;
+      else if (ISO_CHARSET_TABLE (2, 0, 'C') == id)
+	charset_ksc5601 = id;
     }
 
   if (charset.emacs_mule_id >= 0)
@@ -2320,6 +2323,7 @@ init_charset_once ()
   charset_jisx0201_roman = -1;
   charset_jisx0208_1978 = -1;
   charset_jisx0208 = -1;
+  charset_ksc5601 = -1;
 
   for (i = 0; i < 128; i++)
     unibyte_to_multibyte_table[i] = i;