From: tomo <tomo>
Date: Fri, 15 Mar 2002 10:20:13 +0000 (+0000)
Subject: (Vutf_2000_version): New variable [moved from chartab.c].
X-Git-Tag: r21-2-44-utf-2000-0_18-lazy-n10c~61
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7edd70c9f9aed4de8014b6b63a7e7316f8e695f7;p=chise%2Fxemacs-chise.git-

(Vutf_2000_version): New variable [moved from chartab.c].
(vars_of_mule): Add new variable `utf-2000-version' [moved from
chartab.c].
---

diff --git a/src/mule.c b/src/mule.c
index d790561..7a7ed69 100644
--- a/src/mule.c
+++ b/src/mule.c
@@ -93,6 +93,10 @@ accept a pattern compiled by 'regexp-compile' with word-option t.
 
 #endif /* MULE_REGEXP */
 
+#ifdef UTF2000
+Lisp_Object Vutf_2000_version;
+#endif
+
 
 void
 syms_of_mule (void)
@@ -116,6 +120,11 @@ vars_of_mule (void)
 
 #ifdef UTF2000
   Fprovide (intern ("utf-2000"));
+
+  Vutf_2000_version = build_string("0.18 (Yamato-Koizumi)");
+  DEFVAR_LISP ("utf-2000-version", &Vutf_2000_version /*
+Version number of XEmacs UTF-2000.
+*/ );
 #endif
 
 #ifdef HAVE_CHISE_CLIENT