summaryrefslogtreecommitdiff
path: root/lisp/language
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2009-06-30 01:52:12 +0000
committerKenichi Handa <handa@m17n.org>2009-06-30 01:52:12 +0000
commit99b070c5fa2856a644e36e5984a7d61f64bf2d9c (patch)
tree305c786c9c19e01d4b9f24c1f5a82cb9ae0ee510 /lisp/language
parentdbff07a260704e19f6c82c157a2f57dfb8b3793c (diff)
downloademacs-99b070c5fa2856a644e36e5984a7d61f64bf2d9c.tar.gz
(setup-japanese-environment-internal):
Call use-cjk-char-width-table with arg `ja_JP'.
Diffstat (limited to 'lisp/language')
-rw-r--r--lisp/language/japan-util.el2
1 files changed, 1 insertions, 1 deletions
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)