mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-19 06:31:34 -08:00
Code Issues 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.