[Emacs-diffs] Changes to emacs/lisp/international/characters.el,v

[Kenichi Handa]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Kenichi Handa <handa>   08/02/18 12:06:53

Index: characters.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/characters.el,v
retrieving revision 1.71
retrieving revision 1.72
diff -u -b -r1.71 -r1.72
--- characters.el       18 Feb 2008 11:52:16 -0000      1.71
+++ characters.el       18 Feb 2008 12:06:53 -0000      1.72
@@ -1019,11 +1019,13 @@
 
 (defun use-cjk-char-width-table ()
   "Internal use only.
-Setup char-width-table appropriate for CJK language environment.")
+Setup char-width-table appropriate for CJK language environment."
+  (setq char-width-table cjk-char-width-table))
 
 (defun use-default-char-width-table ()
   "Internal use only.
-Setup char-width-table appropriate for non-CJK language environment.")
+Setup char-width-table appropriate for non-CJK language environment."
+  (setq char-width-table (char-table-parent cjk-char-width-table)))
 
 (optimize-char-table (standard-case-table))
 (optimize-char-table (standard-category-table))