diff options
author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2014-11-23 15:00:48 +0100 |
---|---|---|
committer | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2014-11-23 15:00:48 +0100 |
commit | c43b706ab3a699c107a91d1ab6f16014fff65b54 (patch) | |
tree | 18658871908e39e2c2cf66dad2538481941ade0a /lisp/mail | |
parent | 4c298b2a73bda5ad99c1a7c2428b0db91e950820 (diff) | |
download | emacs-c43b706ab3a699c107a91d1ab6f16014fff65b54.tar.gz |
Make some network connections warn unless they are encrypted
* mail/smtpmail.el (smtpmail-via-smtp): Warn unless encrypted and
we're sending a password.
* pop3.el (pop3-open-server): Warn unless encrypted.
* nnimap.el (nnimap-open-connection-1): Warn unless encrypted.
Diffstat (limited to 'lisp/mail')
-rw-r--r-- | lisp/mail/smtpmail.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el index 3440741f573..e70499f222a 100644 --- a/lisp/mail/smtpmail.el +++ b/lisp/mail/smtpmail.el @@ -687,6 +687,7 @@ Returns an error if the server cannot be contacted." "smtpmail" process-buffer host port :type smtpmail-stream-type :return-list t + :warn-unless-encrypted ask-for-password :capability-command (format "EHLO %s\r\n" (smtpmail-fqdn)) :end-of-command "^[0-9]+ .*\r\n" :success "^2.*\n" |