From 903307483a406bed559119d99c7926093b5e5ba7 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Thu, 5 Dec 2002 16:56:21 +0000 Subject: [PATCH] Update safe-chars of mule-utf-8, mule-utf-16-le, mule-utf-16-be. --- lisp/ChangeLog | 5 +++++ lisp/international/utf-8-subst.el | 8 ++++++++ 2 files changed, 13 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cf64ad73ada..eaaab0ce0f2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-12-05 Dave Love + + * international/utf-8-subst.el: Update safe-chars of mule-utf-8, + mule-utf-16-le, mule-utf-16-be. + 2002-12-05 Richard M. Stallman * textmodes/outline.el (outline-mode): Doc fix. diff --git a/lisp/international/utf-8-subst.el b/lisp/international/utf-8-subst.el index 6049e6a09fb..8e5b4affe8c 100644 --- a/lisp/international/utf-8-subst.el +++ b/lisp/international/utf-8-subst.el @@ -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 -- 2.39.2