Socket.st
branchjv
changeset 4252 be9c3684d375
parent 4235 6648f07e2ddd
parent 4239 827d8755965f
child 4277 5bbecb5de7e5
--- a/Socket.st	Thu Dec 22 23:10:37 2016 +0000
+++ b/Socket.st	Mon Dec 26 10:13:16 2016 +0000
@@ -818,11 +818,11 @@
     ^ self
         newTCPclientToHost:hostNameOrAddress
         port:aPortOrServiceName
-        domain:nil
+        domain:self defaultIpDomainForConnect
         withTimeout:nil
 
     "
-      Socket newTCPclientToHost:'www.exept.de' port:'http'
+      Socket newTCPclientToHost:'www.exept.de' port:'https'
     "
 
     "Created: 31.10.1995 / 18:54:11 / cg"
@@ -1123,11 +1123,11 @@
 
 defaultIpDomainForConnect
     "answer the domain used to look up host names for connect:
-	#AF_INET    use only IPv4
-	#AF_INET6   use only IPv6
-	nil         use both IPv4 and IPv6"
-
-    ^ #AF_INET
+        #AF_INET    use only IPv4
+        #AF_INET6   use only IPv6
+        nil         use both IPv4 and IPv6"
+
+    ^ nil
 ! !
 
 !Socket class methodsFor:'obsolete'!