--- a/Socket.st	Wed Sep 19 12:32:35 2018 +0200
+++ b/Socket.st	Wed Sep 19 18:30:51 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1992 by Claus Gittinger
 	      All Rights Reserved
@@ -3479,6 +3481,8 @@
     domain printOn:aStream.
     aStream nextPutAll:' protocol='.
     protocol printOn:aStream.
+    aStream nextPutAll:' type='.
+    socketType printOn:aStream.
     aStream nextPutAll:' port='.
     self port printOn:aStream.
     peer notNil ifTrue:[
@@ -3493,6 +3497,7 @@
     aStream nextPut:$).
 
     "Modified: / 23-04-2018 / 19:44:24 / stefan"
+    "Modified: / 19-09-2018 / 18:30:20 / Claus Gittinger"
 ! !
 
 !Socket methodsFor:'queries'!
@@ -3899,6 +3904,7 @@
     "
 ! !
 
+
 !Socket methodsFor:'specials'!
 
 linger:anIntegerOrNil
@@ -4232,11 +4238,6 @@
     ^ self setSocketOption:#'TCP_NODELAY' argument:aBoolean argument:nil.
 ! !
 
-!Socket methodsFor:'testing'!
-
-isSocket
-    ^ true
-! !
 
 !Socket methodsFor:'waiting'!