Re: Problems with IMAP-over-ssl mail source.

[Gaute B Strokkenes <biggaute@uwc.net>]

On 16 jul 2003, gs234@cam.ac.uk wrote:

>> It should continue with the login.  Could you perhaps edebug
>> `mail-source-fetch-imap' to see what is going on?
>
> Mmm.  I'd have to work out how edebug works first.  I'll do it if I
> get round to it, I'm a bit busy right now.

It's taken me a while, but I've finally gotten round to this.
Consider the following snippet from mail-source-fetch-imap:

    (let* ((from (format "%s:%s:%s" server user port))
	   (found 0)
	   (buffer-name " *imap source*")
	   (buf (get-buffer-create (generate-new-buffer-name buffer-name)))
	   (mail-source-string (format "imap:%s:%s" server mailbox))
	   (imap-shell-program (or (list program) imap-shell-program))
	   remove)
      (if (and (imap-open server port stream authentication buffer-name)
	       (imap-authenticate
		user (or (cdr (assoc from mail-source-password-cache))
			 password) buf)
	       (imap-mailbox-select mailbox nil buf))

The problem appear to be that the " *imap source*" buffer is not
deleted when I interrupt a fetching session.  Then, the next time this
code is called, generate-new-buffer-name ensures that `buf' is a new
buffer called " *imap source*<1>".  However, when imap-open is called
it is passed buffer-name which is still set to " *imap source",
causing imap-open to operate on the wrong temporary buffer.

-- 
Gaute Strokkenes                        http://www.srcf.ucam.org/~gs234/
I have a TINY BOWL in my HEAD