Mercurial > emacs

changeset 91935:0e222c52ad00

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(setup-japanese-environment-internal): Call use-cjk-char-width-table.
author Kenichi Handa <handa@m17n.org>
date Mon, 18 Feb 2008 11:53:59 +0000
parents 6299bdf88132
children cbc008b3464f
files lisp/language/japan-util.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/japan-util.el	Mon Feb 18 11:53:34 2008 +0000
+++ b/lisp/language/japan-util.el	Mon Feb 18 11:53:59 2008 +0000
@@ -36,7 +36,8 @@
   ;; following prefer-coding-system will override it.
   (if (memq system-type '(windows-nt ms-dos cygwin))
       (prefer-coding-system 'japanese-shift-jis)
-    (prefer-coding-system 'japanese-iso-8bit)))
+    (prefer-coding-system 'japanese-iso-8bit))
+  (use-cjk-char-width-table))
 
 (defconst japanese-kana-table
   '((?$B$"(B ?$B%"(B ?(I1(B) (?$B$$(B ?$B%$(B ?(I2(B) (?$B$&(B ?$B%&(B ?(I3(B) (?$B$((B ?$B%((B ?(I4(B) (?$B$*(B ?$B%*(B ?(I5(B)