From: Kenichi Handa <handa@m17n.org>
Date: Tue, 30 Jun 2009 01:52:12 +0000 (+0000)
Subject: (setup-japanese-environment-internal):
X-Git-Tag: emacs-pretest-23.1.90~2387
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=99b070c5fa2856a644e36e5984a7d61f64bf2d9c;p=emacs.git

(setup-japanese-environment-internal):
Call use-cjk-char-width-table with arg `ja_JP'.
---

diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index 0159902559e..f3a5668541b 100644
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -35,7 +35,7 @@
   (if (memq system-type '(windows-nt ms-dos cygwin))
       (prefer-coding-system 'japanese-shift-jis)
     (prefer-coding-system 'japanese-iso-8bit))
-  (use-cjk-char-width-table))
+  (use-cjk-char-width-table 'ja_JP))
 
 (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)