--- a/Socket.st	Tue Feb 10 21:48:04 2015 +0100
+++ b/Socket.st	Fri Feb 13 14:12:25 2015 +0100
@@ -810,7 +810,11 @@
      not the whole smalltalk).
      See also: #newTCPclientToHost:port:withTimeout:"
 
-    ^ self newTCPclientToHost:hostNameOrAddress port:aPortOrServiceName domain:nil withTimeout:nil
+    ^ self 
+        newTCPclientToHost:hostNameOrAddress 
+        port:aPortOrServiceName 
+        domain:nil 
+        withTimeout:nil
 
     "
       Socket newTCPclientToHost:'www.exept.de' port:'http'
@@ -1048,7 +1052,17 @@
     "/ intentionally left blank here
 !
 
+standardDeadline
+    "a standard timeout in seconds for connection setup;
+     not really used in ST/X code (but by some code ported from squeak)"
+
+    ^ 30
+!
+
 standardTimeout
+    "a standard timeout in seconds for transfers;
+     not really used in ST/X code (but by some code ported from squeak)"
+
     ^ 30
 !
 
@@ -4110,10 +4124,10 @@
 !Socket class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.309 2015-02-10 20:48:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.310 2015-02-13 13:12:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.309 2015-02-10 20:48:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Socket.st,v 1.310 2015-02-13 13:12:25 cg Exp $'
 ! !