[Emacs-diffs] emacs/lisp/language japan-util.el

[Kenichi Handa]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Kenichi Handa <handa>   09/06/30 01:52:12

Modified files:
        lisp/language  : japan-util.el 

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

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/language/japan-util.el?cvsroot=emacs&r1=1.47&r2=1.48

Patches:
Index: japan-util.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/language/japan-util.el,v
retrieving revision 1.47
retrieving revision 1.48
diff -u -b -r1.47 -r1.48
--- japan-util.el       5 Jan 2009 03:22:27 -0000       1.47
+++ japan-util.el       30 Jun 2009 01:52:12 -0000      1.48
@@ -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)