[cl-irc-cvs] r167 - trunk

[ehuelsmann at common-lisp.net]

Author: ehuelsmann
Date: Fri Jan  5 04:03:51 2007
New Revision: 167

Modified:
   trunk/protocol.lisp
Log:
Remove forgotten socket-connect call.

Modified: trunk/protocol.lisp
==============================================================================
--- trunk/protocol.lisp	(original)
+++ trunk/protocol.lisp	Fri Jan  5 04:03:51 2007
@@ -456,7 +456,8 @@
                                  (output-stream t))
   (make-instance 'dcc-connection
                  :user user
-                 :network-stream (socket-connect remote-address remote-port)
+                 :network-stream (usocket:socket-connect remote-address
+                                                         remote-port)
                  :output-stream output-stream))
 
 (defgeneric dcc-close (connection))