procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* language/japan-util.el (setup-japanese-environment-internal):

Browse source 
Prefer japanese-iso-8bit if the system-type is usg-unix-v.
This commit is contained in:
Paul Eggert 1999-10-19 07:20:29 +00:00
parent 40c81f74c3
commit ef83dfaf7d
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/language/japan-util.el
View file

@ -34,9 +34,10 @@
;;;###autoload
(defun setup-japanese-environment-internal ()
(if (eq system-type 'ms-dos)
(prefer-coding-system 'japanese-shift-jis)
(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)))
(setq sentence-end-save sentence-end)
(setq sentence-end (concat sentence-end "\\|[$B!#!)!*(B]")))