mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-02 11:21:42 +00:00
(sendmail-coding-system): Doc-string modified.
(sendmail-send-it): Select a safe coding system to encode an outgoing mail.
This commit is contained in:
parent
b3fffbb92b
commit
5e7e990e1a
@ -606,7 +606,7 @@ the user from the mailer."
|
||||
|
||||
;;;###autoload
|
||||
(defvar sendmail-coding-system nil
|
||||
"Coding system to which to encode the mail.")
|
||||
"Coding system to encode the outgoing mail.")
|
||||
|
||||
(defun sendmail-send-it ()
|
||||
(require 'mail-utils)
|
||||
@ -625,6 +625,10 @@ the user from the mailer."
|
||||
(or sendmail-coding-system
|
||||
default-buffer-file-coding-system
|
||||
'iso-latin-1))))
|
||||
(if (fboundp select-safe-coding-system-function)
|
||||
(setq sendmail-coding-system
|
||||
(funcall select-safe-coding-system-function
|
||||
(point-min) (point-max) sendmail-coding-system)))
|
||||
(unwind-protect
|
||||
(save-excursion
|
||||
(set-buffer tembuf)
|
||||
|
Loading…
Reference in New Issue
Block a user