From: Chong Yidong <cyd@stupidchicken.com>
Date: Sat, 7 Apr 2007 03:52:21 +0000 (+0000)
Subject: (open-tls-stream): Properly handle case where there is no associated
X-Git-Tag: emacs-pretest-22.0.98~236
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=08b53f053738b723262aa120d272d0559cd7b1b8;p=emacs.git

(open-tls-stream): Properly handle case where there is no associated
buffer.
---

diff --git a/lisp/net/tls.el b/lisp/net/tls.el
index 9de74ca19d4..ee093571dec 100644
--- a/lisp/net/tls.el
+++ b/lisp/net/tls.el
@@ -142,6 +142,7 @@ Fourth arg PORT is an integer specifying a port to connect to."
 	     response)
 	(while (and process
 		    (memq (process-status process) '(open run))
+		    buffer
 		    (save-excursion
 		      (set-buffer buffer) ;; XXX "blue moon" nntp.el bug
 		      (goto-char (point-min))