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

[Helmut Eller]

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

Modified Files:
	swank-clisp.lisp 
Log Message:
(accept-connection): Remove superfluous call to socket-wait.

Date: Tue Jan 13 14:27:24 2004
Author: heller

Index: slime/swank-clisp.lisp
diff -u slime/swank-clisp.lisp:1.8 slime/swank-clisp.lisp:1.9
--- slime/swank-clisp.lisp:1.8	Tue Jan 13 13:20:04 2004
+++ slime/swank-clisp.lisp	Tue Jan 13 14:27:24 2004
@@ -60,7 +60,6 @@
   (socket:socket-server-close socket))
 
 (defmethod accept-connection (socket)
-  (socket:socket-wait socket)
   (socket:socket-accept socket
 			:buffered nil ;; XXX should be t
 			:element-type 'character