mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00
Code Issues Releases Activity

Prefer port smtp over port 587 when sending mail.

Browse Source 
* mail/smtpmail.el (smtpmail-query-smtp-server): Try port 25
before 587, since it appears that that's more likely to work for
more people.
This commit is contained in:
Lars Magne Ingebrigtsen 2011-08-02 17:57:35 +02:00
parent 98cd6c18c5
commit 57d5aff0c0
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,5 +1,9 @@
2011-08-02 Lars Magne Ingebrigtsen <larsi@gnus.org>
* mail/smtpmail.el (smtpmail-query-smtp-server): Try port 25
before 587, since it appears that that's more likely to work for
more people.
* cus-edit.el (custom-file): When running under emacs -q, always
refuse to save the customisations, even if the .emacs file doesn't
exist.

2
lisp/mail/smtpmail.el
View File

@ -589,7 +589,7 @@ The list is in preference order.")
(defun smtpmail-query-smtp-server ()
(let ((server (read-string "Outgoing SMTP mail server: "))
(ports '(587 "smtp"))
(ports '("smtp" 587))
stream port)
(when (and smtpmail-smtp-server
(not (member smtpmail-smtp-server ports)))