Move function `split-char-or-char-int' to mule-misc.el.

diff --git a/lisp/mule/vietnamese.el b/lisp/mule/vietnamese.el
index 241d6c6..d71dbcf 100644 (file)
--- a/lisp/mule/vietnamese.el
+++ b/lisp/mule/vietnamese.el
@@ -51,17 +51,6 @@
    ?\e.1\eNp ?\eNq ?\eNr ?\eNs ?\eNt ?\eNu ?\eNv ?\eNw ?\eNx ?\eNy ?\eNz ?\eN{ ?\eN| ?\eN} ?\eN~ ?\e.2\eNf ]
   "Vietnamese VISCII decoding table.")
 
-(defun split-char-or-char-int (char)
-  "Return list of charset and one or two position-codes of CHAR.
-CHAR must be character or integer."
-  (if (characterp char)
-      (split-char char)
-    (let ((c (int-char char)))
-      (if c
-         (split-char c)
-       (list 'ascii c)
-       ))))
-
 (defvar viet-viscii-encode-table
   (let ((table-lower (make-vector 128 0))
        (table-upper (make-vector 128 0))