summaryrefslogtreecommitdiff
path: root/lisp/language/viet-util.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1998-08-02 01:06:57 +0000
committerKenichi Handa <handa@m17n.org>1998-08-02 01:06:57 +0000
commit9f3cdc9a562a86e79da9aa5079c8e425b0625dba (patch)
tree4f12a291cef15bce6878096a5f86902c44a8b53b /lisp/language/viet-util.el
parent7f9d4788dfbfba04066e22f529f482b8180bb0ce (diff)
downloademacs-9f3cdc9a562a86e79da9aa5079c8e425b0625dba.tar.gz
(viet-encode-viscii-char): New function.
Diffstat (limited to 'lisp/language/viet-util.el')
-rw-r--r--lisp/language/viet-util.el6
1 files changed, 6 insertions, 0 deletions
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
@@ -36,6 +36,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."
(interactive)