Merge from emacs--devo--0

[gnu-emacs] / lisp / language / viet-util.el

diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el
index 2a1cc0fd67908d73fb12c4598b1a23e5fc8278e5..3ea53621c95c9a404d4082b2f825a120823bfadb 100644 (file)
--- a/lisp/language/viet-util.el
+++ b/lisp/language/viet-util.el
@@ -6,6 +6,9 @@
 ;;   2005, 2006, 2007
 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
 ;;   Registration Number H14PRO021
+;; Copyright (C) 2003
+;;   National Institute of Advanced Industrial Science and Technology (AIST)
+;;   Registration Number H13PRO009
 
 ;; Keywords: mule, multilingual, Vietnamese
 
@@ -45,8 +48,7 @@
 ;;;###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))
+  (encode-char char 'viscii))
 
 ;; VIQR is a menmonic encoding specification for Vietnamese.
 ;; It represents diacritical marks by ASCII characters as follows: