diff options
| author | Kenichi Handa | 2003-03-12 07:23:51 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2003-03-12 07:23:51 +0000 |
| commit | 9a05d1faa9ac2e631d1042de5ce0a4c23b583c7f (patch) | |
| tree | fabcdfafc5168fec517ac499ca54dfd535ac1e44 | |
| parent | 04c114e57ff337fa584098a133d3f7bd0c90258c (diff) | |
| download | emacs-9a05d1faa9ac2e631d1042de5ce0a4c23b583c7f.tar.gz emacs-9a05d1faa9ac2e631d1042de5ce0a4c23b583c7f.zip | |
(setup-japanese-environment-internal):
By defalt, use japanese-iso-8bit for file names.
| -rw-r--r-- | lisp/language/japan-util.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el index b84e003cfe1..7641593440c 100644 --- a/lisp/language/japan-util.el +++ b/lisp/language/japan-util.el | |||
| @@ -29,6 +29,9 @@ | |||
| 29 | 29 | ||
| 30 | ;;;###autoload | 30 | ;;;###autoload |
| 31 | (defun setup-japanese-environment-internal () | 31 | (defun setup-japanese-environment-internal () |
| 32 | ;; By default, we use 'japanese-iso-8bit for file names. But, the | ||
| 33 | ;; following prefer-coding-system will override it. | ||
| 34 | (setq default-file-name-coding-system 'japanese-iso-8bit) | ||
| 32 | (cond ((eq system-type 'ms-dos) | 35 | (cond ((eq system-type 'ms-dos) |
| 33 | (prefer-coding-system 'japanese-shift-jis)) | 36 | (prefer-coding-system 'japanese-shift-jis)) |
| 34 | ((eq system-type 'usg-unix-v) | 37 | ((eq system-type 'usg-unix-v) |