OOps, must do a select for write when waiting for an async connect.
--- 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 $'
! !