[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r105523: (smtpmail-try-auth-methods):
From: |
Lars Magne Ingebrigtsen |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r105523: (smtpmail-try-auth-methods): Expand the secret password. |
Date: |
Sun, 21 Aug 2011 22:10:29 +0200 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 105523
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Sun 2011-08-21 22:10:29 +0200
message:
(smtpmail-try-auth-methods): Expand the secret password.
modified:
lisp/ChangeLog
lisp/mail/smtpmail.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-08-21 19:27:27 +0000
+++ b/lisp/ChangeLog 2011-08-21 20:10:29 +0000
@@ -3,6 +3,7 @@
* mail/smtpmail.el (smtpmail-via-smtp): Only bind
`coding-system-for-*' around the process open call to avoid
auth-source side effects.
+ (smtpmail-try-auth-methods): Expand the secret password.
2011-08-21 Chong Yidong <address@hidden>
=== modified file 'lisp/mail/smtpmail.el'
--- a/lisp/mail/smtpmail.el 2011-08-21 19:27:27 +0000
+++ b/lisp/mail/smtpmail.el 2011-08-21 20:10:29 +0000
@@ -505,6 +505,8 @@
(save-function (and ask-for-password
(plist-get auth-info :save-function)))
ret)
+ (when (functionp password)
+ (setq password (funcall password)))
(when (and user
(not password))
;; The user has stored the user name, but not the password, so
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r105523: (smtpmail-try-auth-methods): Expand the secret password.,
Lars Magne Ingebrigtsen <=