martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(select-message-coding-system): Be

Browse Source 
sure to use LF for end-of-line.  If no coding system is decided,
return iso-8859-1-unix.
This commit is contained in:
Kenichi Handa
2005-07-29 01:44:52 +00:00
parent d44e3b453c
commit 661635c2dc
1 changed files with 13 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -1027,10 +1027,19 @@ it asks the user to select a proper coding system."
;; We should never use no-conversion for outgoing mail.
(setq coding nil))
(if (fboundp select-safe-coding-system-function)
(funcall select-safe-coding-system-function
(point-min) (point-max) coding
(function (lambda (x) (coding-system-get x 'mime-charset))))
coding)))
(setq coding
(funcall select-safe-coding-system-function
(point-min) (point-max) coding
(function (lambda (x)
(coding-system-get x 'mime-charset))))))
(if coding
;; Be sure to use LF for end-of-line.
(setq coding (coding-system-change-eol-conversion coding 'unix))
;; No coding system is decided. Usually this is the case that
;; the current buffer contains only ASCII. So, we hope
;; iso-8859-1 works.
(setq coding 'iso-8859-1-unix))
coding))
;;; Language support stuff.