[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/language/japan-util.el
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/language/japan-util.el |
Date: |
Wed, 12 Mar 2003 02:39:24 -0500 |
Index: emacs/lisp/language/japan-util.el
diff -c emacs/lisp/language/japan-util.el:1.33
emacs/lisp/language/japan-util.el:1.34
*** emacs/lisp/language/japan-util.el:1.33 Wed Mar 12 02:23:51 2003
--- emacs/lisp/language/japan-util.el Wed Mar 12 02:39:24 2003
***************
*** 32,41 ****
;; By default, we use 'japanese-iso-8bit for file names. But, the
;; following prefer-coding-system will override it.
(setq default-file-name-coding-system 'japanese-iso-8bit)
! (cond ((eq system-type 'ms-dos)
! (prefer-coding-system 'japanese-shift-jis))
! ((eq system-type 'usg-unix-v)
! (prefer-coding-system 'japanese-iso-8bit))))
(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)
--- 32,39 ----
;; By default, we use 'japanese-iso-8bit for file names. But, the
;; following prefer-coding-system will override it.
(setq default-file-name-coding-system 'japanese-iso-8bit)
! (if (memq system-type '(windows-nt ms-dos cygwin))
! (prefer-coding-system 'japanese-shift-jis)))
(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)