changeset 80350:af4d6ac258a1

(open-tls-stream): Use with-current-buffer.
author Reiner Steib <Reiner.Steib@gmx.de>
date Wed, 19 Mar 2008 21:21:38 +0000
parents 07ebd0fc42b8
children ce20bc1998a8
files lisp/ChangeLog lisp/net/tls.el
diffstat 2 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Mar 19 21:01:37 2008 +0000
+++ b/lisp/ChangeLog	Wed Mar 19 21:21:38 2008 +0000
@@ -2,6 +2,7 @@
 
 	* net/tls.el: Don't require rx when compiling.
 	(tls-end-of-info): Rewrite without using rx.
+	(open-tls-stream): Use with-current-buffer.
 
 2008-03-18  Dan Nicolaescu  <dann@ics.uci.edu>
 
--- a/lisp/net/tls.el	Wed Mar 19 21:01:37 2008 +0000
+++ b/lisp/net/tls.el	Wed Mar 19 21:21:38 2008 +0000
@@ -153,8 +153,7 @@
 	process	cmd done)
     (if use-temp-buffer
 	(setq buffer (generate-new-buffer " TLS")))
-    (save-excursion
-      (set-buffer buffer)
+    (with-current-buffer buffer
       (message "Opening TLS connection to `%s'..." host)
     (while (and (not done) (setq cmd (pop cmds)))
       (message "Opening TLS connection with `%s'..." cmd)