Re: [garym@teledyn.com: StartTLS fails on CVS build]

[Chong Yidong <cyd@stupidchicken.com>]

> I have verified this with a clean build downloaded from scratch today,
> and verified with the built-in GNUS 5.10 and with a fresh install
> of the NoGnus 0.3; both give the same behaviour.  
>
> I have also verified that the remote imap exists and I can fetch
> to this machine from that server with the same :user and :password
> using other imap software.

Does this fix the bug?

*** emacs/lisp/gnus/imap.el.~1.24.~	2005-10-26 21:31:20.000000000 -0400
--- emacs/lisp/gnus/imap.el	2005-10-29 10:41:46.000000000 -0400
***************
*** 1038,1045 ****
  			   stream))
  		      ;; We're done, kill the first connection
  		      (imap-close buffer)
! 		      (kill-buffer buffer)
! 		      (rename-buffer buffer)
  		      (message "imap: Reconnecting with stream `%s'...done"
  			       stream)
  		      (setq imap-stream stream)
--- 1038,1048 ----
  			   stream))
  		      ;; We're done, kill the first connection
  		      (imap-close buffer)
! 		      (let ((name (if (stringp buffer)
! 				      buffer
! 				    (buffer-name buffer))))
! 			(kill-buffer buffer)
! 			(rename-buffer name))
  		      (message "imap: Reconnecting with stream `%s'...done"
  			       stream)
  		      (setq imap-stream stream)