mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-08 15:35:02 +00:00
Code Issues Releases Activity

(set-default-coding-systems): Set

Browse Source 
default-file-name-coding-system.  Doc-string modified.
(prefer-coding-system): Doc-string modified.
This commit is contained in:
Kenichi Handa 1998-03-03 01:36:35 +00:00
parent 73ba53dc85
commit 387136f687
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/international/mule-cmds.el
View File

@ -185,24 +185,27 @@ wrong, use this command again to toggle back to the right mode."
(defun set-default-coding-systems (coding-system)
"Set default value of various coding systems to CODING-SYSTEM.
This sets the follwing coding systems:
This sets the following coding systems:
o coding system of a newly created buffer
o default coding system for subprocess I/O
This also sets the following values:
o default value used as file-name-coding-system for converting file names.
o default value for the command `set-terminal-coding-system'
o default value for the command `set-keyboard-coding-system'"
(check-coding-system coding-system)
(setq-default buffer-file-coding-system coding-system)
(setq default-file-name-coding-system coding-system)
(setq default-terminal-coding-system coding-system)
(setq default-keyboard-coding-system coding-system)
(setq default-process-coding-system (cons coding-system coding-system)))
(defun prefer-coding-system (coding-system)
"Add CODING-SYSTEM at the front of the priority list for automatic detection.
This also sets the follwing coding systems:
This also sets the following coding systems:
o coding system of a newly created buffer
o default coding system for subprocess I/O
This also sets the following values:
o default value used as file-name-coding-system for converting file names.
o default value for the command `set-terminal-coding-system'
o default value for the command `set-keyboard-coding-system'"
(interactive "zPrefer coding system: ")