[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

Update of /project/slime/cvsroot/slime/contrib
In directory tiger.common-lisp.net:/tmp/cvs-serv4376

Modified Files:
	ChangeLog slime-repl.el 
Log Message:
* slime-repl.el (slime-open-stream-to-lisp): Use current
connection host instead of slime-lisp-host.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2013/02/03 12:13:42	1.570
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2013/02/10 19:29:30	1.571
@@ -1,3 +1,8 @@
+2013-02-10  Stas Boukarev  <stassats at gmail.com>
+
+	* slime-repl.el (slime-open-stream-to-lisp): Use current
+	connection host instead of slime-lisp-host.
+
 2013-02-03  Stas Boukarev  <stassats at gmail.com>
 
 	* swank-sprof.lisp (pretty-name): Better frame names.
--- /project/slime/cvsroot/slime/contrib/slime-repl.el	2012/11/23 11:37:53	1.65
+++ /project/slime/cvsroot/slime/contrib/slime-repl.el	2013/02/10 19:29:30	1.66
@@ -190,7 +190,8 @@
   (let ((stream (open-network-stream "*lisp-output-stream*" 
                                      (slime-with-connection-buffer ()
                                        (current-buffer))
-				     slime-lisp-host port))
+				     (car (process-contact (slime-connection)))
+                                     port))
         (emacs-coding-system (car (find coding-system
                                         slime-net-valid-coding-systems
                                         :key #'third))))