Split definition of the charset `thai-xtis' to thai-xtis-chars.el.

diff --git a/lisp/mule/thai-xtis.el b/lisp/mule/thai-xtis.el
index 6f874a8..60f7ef5 100644 (file)
--- a/lisp/mule/thai-xtis.el
+++ b/lisp/mule/thai-xtis.el
@@ -1,4 +1,4 @@
-;;; thai-xtis.el --- Thai support for pre-composed font (for XTIS).
+;;; thai-xtis.el --- Thai support for pre-composed representation (XTIS).
 
 ;; Copyright (C) 1999 Electrotechnical Laboratory, JAPAN.
 ;; Licensed to the Free Software Foundation.
@@ -35,19 +35,6 @@
 ;;; Code:
 
 (when (featurep 'xemacs)
-  (make-charset 'thai-xtis "Precomposed Thai (XTIS by Virach)."
-               '(registry "xtis-0"
-                          dimension 2
-                          columns 1
-                          chars 94
-                          final ??
-                          graphic 0))
-
-  (modify-syntax-entry 'thai-xtis "w")
-
-  (define-category ?x "Precomposed Thai character.")
-  (modify-category-entry 'thai-xtis ?x)
-
   (let ((deflist       '(;; chars      syntax
                          ("\e$(?!0\e(B-\e$(?NxP0R0S0`0\e(B-\e$(?e0\e(B"      "w")
                          ("\e$(?p0\e(B-\e$(?y0\e(B"        "w")