OOps, must do a select for write when waiting for an async connect.
authorStefan Vogel <sv@exept.de>
Tue, 08 Aug 2000 15:31:13 +0200
changeset 898 8cf7b1fb2e5c
parent 897 cc07264c7492
child 899 fe2b44d0d9c1
OOps, must do a select for write when waiting for an async connect.
Socket.st
--- a/Socket.st	Sat Aug 05 19:48:39 2000 +0200
+++ b/Socket.st	Tue Aug 08 15:31:13 2000 +0200
@@ -4066,7 +4066,7 @@
 #endif /* NO_SOCKET */
 %}.
     isAsync == true ifTrue:[
-        (self readWaitWithTimeoutMs:timeout) ifTrue:[
+        (self writeWaitWithTimeoutMs:timeout) ifTrue:[
             "/ a timeout occured
             "/ should cancel the connect?
             ^ false.
@@ -4763,5 +4763,5 @@
 !Socket class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.148 2000-08-04 16:27:09 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.149 2000-08-08 13:31:13 stefan Exp $'
 ! !