Re: [gnus git] Add ~/.authinfo to the default, since that's probably most useful for users.

[Ted Zlatanov <tzz@lifelogs.com>]

On Mon, 20 Sep 2010 13:03:38 +0200 Robert Pluim <rpluim@gmail.com> wrote: 

RP> Apropos, I have a ~/.authinfo which contains

RP> machine myimapserver login myusername port imap

RP> machine myimapserver login myusername port 993

RP> machine myimapserver login myusername port imaps

RP> And I *still* get prompted for both my username and password when
RP> connecting to imap. What magic incantation am I missing? (and no, I'm
RP> not going to be putting my password in that file).

It assumes you have both or neither in the file.  Can you try this
version of nnimap-credentials (press `C-x C-e' after the closing
parenthesis)?

(defun nnimap-credentials (address ports)
  (let (port credentials)
    ;; Request the credentials from all ports, but only query on the
    ;; last port if all the previous ones have failed.
    (while (and (null credentials)
		(setq port (pop ports)))
      (setq credentials
	    (or
             (auth-source-user-or-password
              '("login" "password") address port nil (null ports))
             (auth-source-user-or-password
              '("login") address port nil (null ports)))))
    credentials))

I don't think the general solution is to return ("myusername" nil) in
such cases.  It seems to me that if the application asks for two
authentication tokens, it expects them both to be valid.

Thanks
Ted