diff lisp/language/viet-util.el @ 22880:125bb37b2e27

(viet-encode-viscii-char): New function.
author Kenichi Handa <handa@m17n.org>
date Sun, 02 Aug 1998 01:06:57 +0000
parents f510736ce3d1
children 708271862495
line wrap: on
line diff
--- a/lisp/language/viet-util.el	Sun Aug 02 01:06:57 1998 +0000
+++ b/lisp/language/viet-util.el	Sun Aug 02 01:06:57 1998 +0000
@@ -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)