Index: emacs/lisp/international/mule-cmds.el
diff -c emacs/lisp/international/mule-cmds.el:1.278
emacs/lisp/international/mule-cmds.el:1.279
*** emacs/lisp/international/mule-cmds.el:1.278 Tue Jul 19 02:29:58 2005
--- emacs/lisp/international/mule-cmds.el Fri Jul 29 01:44:52 2005
***************
*** 1027,1036 ****
;; 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)))
;;; Language support stuff.
--- 1027,1045 ----
;; We should never use no-conversion for outgoing mail.
(setq coding nil))
(if (fboundp select-safe-coding-system-function)
! (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.
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
