--- a/Socket.st	Mon Apr 23 18:56:31 2018 +0200
+++ b/Socket.st	Mon Apr 23 19:45:07 2018 +0200
@@ -3489,9 +3489,18 @@
     protocol printOn:aStream.
     aStream nextPutAll:' port='.
     self port printOn:aStream.
-    aStream nextPutAll:' peer='.
-    peer printOn:aStream.
+    peer notNil ifTrue:[
+        aStream nextPutAll:' peer='.
+        peer printOn:aStream.
+    ].
+    listening notNil ifTrue:[
+        aStream nextPutAll:' *listening('.
+        listening printOn:aStream.
+        aStream nextPutAll:')*'.
+    ].
     aStream nextPut:$).
+
+    "Modified: / 23-04-2018 / 19:44:24 / stefan"
 ! !
 
 !Socket methodsFor:'queries'!
@@ -3898,6 +3907,7 @@
     "
 ! !
 
+
 !Socket methodsFor:'specials'!
 
 linger:anIntegerOrNil
@@ -4231,11 +4241,6 @@
     ^ self setSocketOption:#'TCP_NODELAY' argument:aBoolean argument:nil.
 ! !
 
-!Socket methodsFor:'testing'!
-
-isSocket
-    ^ true
-! !
 
 !Socket methodsFor:'waiting'!