# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1039107325 0
# Node ID 467a7f8b57f4aa5130d0264371597bcb2eb60e40
# Parent  672c6eac16e734bb5d1e09a50b771d1f3478b3f3
Update safe-chars of mule-utf-8,
mule-utf-16-le, mule-utf-16-be.

diff -r 672c6eac16e7 -r 467a7f8b57f4 lisp/international/utf-8-subst.el
--- a/lisp/international/utf-8-subst.el	Thu Dec 05 16:51:56 2002 +0000
+++ b/lisp/international/utf-8-subst.el	Thu Dec 05 16:55:25 2002 +0000
@@ -20144,5 +20144,13 @@
    (#x9F9D ?龝)
    (#x9FA0 ?龠))) 
 
+(let ((tab (make-char-table 'translation-table)))
+  (maphash (lambda (k v)
+	     (aset tab k v))
+	   ucs-mule-cjk-to-unicode)
+  (register-char-codings 'mule-utf-8 tab)
+  (register-char-codings 'mule-utf-16-be tab)
+  (register-char-codings 'mule-utf-16-le tab))
+
 (provide 'utf-8-subst)
 ;;; utf-8-subst.el ends here