From: Kenichi Handa <handa@m17n.org>
Date: Sun, 2 Aug 1998 01:06:57 +0000 (+0000)
Subject: (viet-encode-viscii-char): New function.
X-Git-Tag: emacs-20.3~199
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0c9470b3032347ba0115a47fc796ce3e2e72580b;p=emacs.git

(viet-encode-viscii-char): New function.
---

diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el
index 95c54f159c3..5e3ce7e9cf6 100644
--- a/lisp/language/viet-util.el
+++ b/lisp/language/viet-util.el
@@ -35,6 +35,12 @@
 
 ;;; Code:
 
+;;;###autoload
+(defun viet-encode-viscii-char (char)
+  "Return VISCII character code of CHAR if appropriate."
+  (aref (char-table-extra-slot viet-viscii-nonascii-translation-table 0)
+	char))
+
 ;;;###autoload
 (defun setup-vietnamese-environment ()
   "Setup multilingual environment (MULE) for Vietnamese VISCII users."