[slime-cvs] CVS update: slime/swank.lisp

[Helmut Eller]

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

Modified Files:
	swank.lisp 
Log Message:
(connection-info): Include version and hostname in the result.

Date: Mon Apr  4 01:27:20 2005
Author: heller

Index: slime/swank.lisp
diff -u slime/swank.lisp:1.291 slime/swank.lisp:1.292
--- slime/swank.lisp:1.291	Fri Apr  1 21:55:18 2005
+++ slime/swank.lisp	Mon Apr  4 01:27:20 2005
@@ -1016,13 +1016,16 @@
                                     
 (defslimefun connection-info ()
   "Return a list of the form: 
-\(PID IMPLEMENTATION-TYPE IMPLEMENTATION-NAME FEATURES)."
+\(PID IMPLEMENTATION-TYPE IMPLEMENTATION-NAME FEATURES 
+ COMMUNICATION-STYLE IMPLEMENTATION-VERSION MACHINE-INSTANCE)."
   (setq *slime-features* *features*)
   (list (getpid)
         (lisp-implementation-type)
         (lisp-implementation-type-name)
         (features-for-emacs)
-        (connection.communication-style *emacs-connection*)))
+        (connection.communication-style *emacs-connection*)
+        (lisp-implementation-version)
+        (machine-instance)))
 
 
 ;;;; Reading and printing