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 4dc9be45a2e77466572e2f9ad719ef9a52a49d51..16341a9af2d76c8be0b1435c0fff514742a7d05f 100644 (file)
--- a/lisp/language/viet-util.el
+++ b/lisp/language/viet-util.el
@@ -6,6 +6,9 @@
 ;;   2005, 2006, 2007, 2008
 ;;   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: