Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-19 11:27:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

* mail/sendmail.el (send-mail-function): Change the default to `sendmail-query-once'.

Browse source
This commit is contained in:
Lars Magne Ingebrigtsen 2011-07-06 17:39:32 +02:00
parent 1f2b92cb87
commit f0691d22b1
2 changed files with 6 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2011-07-06 Lars Magne Ingebrigtsen <larsi@gnus.org>
* mail/sendmail.el (send-mail-function): Change the default to
`sendmail-query-once'.
* net/network-stream.el (network-stream-open-starttls): Try using
a plain connection even if the server offered STARTTLS, and we
kinda wanted to use it, if Emacs doesn't have any STARTTLS

13
lisp/mail/sendmail.el
View file

@ -144,19 +144,11 @@ Otherwise, let mailer send back a message to report errors."
;;;###autoload
(put 'send-mail-function 'standard-value
;; MS-Windows can access the clipboard even under -nw.
'((if (or (and window-system (eq system-type 'darwin))
(eq system-type 'windows-nt))
'mailclient-send-it
'sendmail-send-it)))
'('sendmail-query-once))
;; Useful to set in site-init.el
;;;###autoload
(defcustom send-mail-function
(if (or (and window-system (eq system-type 'darwin))
;; MS-Windows can access the clipboard even under -nw.
(eq system-type 'windows-nt))
'mailclient-send-it
'sendmail-send-it)
(defcustom send-mail-function 'sendmail-query-once
"Function to call to send the current buffer as mail.
The headers should be delimited by a line which is
not a valid RFC822 header or continuation line,
@ -170,6 +162,7 @@ This is used by the default mail-sending commands. See also
(function-item mailclient-send-it :tag "Use Mailclient package")
function)
:initialize 'custom-initialize-delay
:version "24.1"
:group 'sendmail)
(defvar sendmail-query-once-function 'query