mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

Remember password change for IMAP in Gnus (Bug#29692)

Browse Source 
Reported by Trey Jackson <trey_jackson@mentor.com>.

* lisp/gnus/mail-source.el (mail-source-fetch-imap): Check
`mail-source-password-cache' for password.
This commit is contained in:
Ted Zlatanov 2017-12-15 00:17:30 -05:00
parent a21dac18bb
commit b178870528
No known key found for this signature in database
GPG Key ID: 11F23D0A4E4B9DEE
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/gnus/mail-source.el
View File

@ -1097,7 +1097,8 @@ This only works when `display-time' is enabled."
;; remember password
(with-current-buffer buf
(when (and imap-password
(not (assoc from mail-source-password-cache)))
(not (member (cons from imap-password)
mail-source-password-cache)))
(push (cons from imap-password) mail-source-password-cache)))
;; if predicate is nil, use all uids
(dolist (uid (imap-search (or predicate "1:*") buf))