Commit ab513ed4 authored by Chong Yidong's avatar Chong Yidong
Browse files

* imap.el (imap-open): Handle case where buffer is a buffer

	object.
parent 8a955545
2005-10-30 Chong Yidong <cyd@stupidchicken.com>
* imap.el (imap-open): Handle case where buffer is a buffer
object.
2005-10-24 Eli Zaretskii <eliz@gnu.org> 2005-10-24 Eli Zaretskii <eliz@gnu.org>
* pgg-def.el: * pgg-def.el:
......
...@@ -1038,8 +1038,11 @@ necessary. If nil, the buffer name is generated." ...@@ -1038,8 +1038,11 @@ necessary. If nil, the buffer name is generated."
stream)) stream))
;; We're done, kill the first connection ;; We're done, kill the first connection
(imap-close buffer) (imap-close buffer)
(let ((name (if (stringp buffer)
buffer
(buffer-name buffer))))
(kill-buffer buffer) (kill-buffer buffer)
(rename-buffer buffer) (rename-buffer name))
(message "imap: Reconnecting with stream `%s'...done" (message "imap: Reconnecting with stream `%s'...done"
stream) stream)
(setq imap-stream stream) (setq imap-stream stream)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment