mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-03-06 14:02:07 -08:00
nnimap.el (nnimap-open-connection): Revert the change that would look into authinfo for imaps instead of imap.
This commit is contained in:
parent
cc4244d36d
commit
d32fac6994
2 changed files with 6 additions and 7 deletions
|
|
@ -1,5 +1,8 @@
|
|||
2010-09-05 Lars Magne Ingebrigtsen <larsi@gnus.org>
|
||||
|
||||
* nnimap.el (nnimap-open-connection): Revert the change that would look
|
||||
into authinfo for imaps instead of imap.
|
||||
|
||||
* gnus-start.el (gnus-activate-group): Take an optional parameter to
|
||||
say that you don't want to call gnus-request-group with don-check, but
|
||||
do check the reponse. This is for virtual groups only.
|
||||
|
|
|
|||
|
|
@ -833,13 +833,9 @@ If EXAMINE is non-nil the group is selected read-only."
|
|||
(let* ((list (progn (gnus-message 7 "Parsing authinfo file `%s'."
|
||||
nnimap-authinfo-file)
|
||||
(netrc-parse nnimap-authinfo-file)))
|
||||
(port (cond
|
||||
(nnimap-server-port
|
||||
(int-to-string nnimap-server-port))
|
||||
((eq nnimap-stream 'ssl)
|
||||
"imaps")
|
||||
(t
|
||||
"imap")))
|
||||
(port (if nnimap-server-port
|
||||
(int-to-string nnimap-server-port)
|
||||
"imap"))
|
||||
(auth-info
|
||||
(auth-source-user-or-password '("login" "password") server port))
|
||||
(auth-user (nth 0 auth-info))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue