*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 02 Mar 2005 17:52:15 +0100
changeset 1533 a64cbf0e29b0
parent 1532 36cfd144f135
child 1534 5aeec5c0564b
*** empty log message ***
Socket.st
--- a/Socket.st	Wed Mar 02 15:08:06 2005 +0100
+++ b/Socket.st	Wed Mar 02 17:52:15 2005 +0100
@@ -2436,7 +2436,7 @@
 
 	if (usize == -1) goto argError;
 
-	ok = ( setsockopt( sock, level, option, &u, usize) >= 0);
+	ok = ( setsockopt( sock, level, opt, &u, usize) >= 0) ? true : false;
     }
 argError: ;
 
@@ -3774,5 +3774,5 @@
 !Socket class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.209 2005-03-02 14:08:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.210 2005-03-02 16:52:15 cg Exp $'
 ! !