[Emacs-diffs] Changes to emacs/lisp/net/tls.el,v

[Katsumi Yamaoka]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Katsumi Yamaoka <yamaoka>       08/07/18 00:59:12

Index: net/tls.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/tls.el,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -b -r1.36 -r1.37
--- net/tls.el  7 Jun 2008 02:38:59 -0000       1.36
+++ net/tls.el  18 Jul 2008 00:59:10 -0000      1.37
@@ -216,7 +216,11 @@
        (use-temp-buffer (null buffer))
        process cmd done)
     (if use-temp-buffer
-       (setq buffer (generate-new-buffer " TLS")))
+       (setq buffer (generate-new-buffer " TLS"))
+      ;; BUFFER is a string but does not exist as a buffer object.
+      (unless (and (get-buffer buffer)
+                  (buffer-name (get-buffer buffer)))
+       (generate-new-buffer buffer)))
     (with-current-buffer buffer
       (message "Opening TLS connection to `%s'..." host)
       (while (and (not done) (setq cmd (pop cmds)))