--- a/Socket.st	Thu Sep 22 15:14:47 2016 +0200
+++ b/Socket.st	Thu Sep 22 15:18:35 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1992 by Claus Gittinger
 	      All Rights Reserved
@@ -3592,11 +3594,11 @@
 !
 
 getPeerName
-    "return the peer name; thats the hostname (or dotted name) of the
+    "return the peer name; that's the hostname (or dotted name) of the
      partners host after an accept."
 
     peerName isNil ifTrue:[
-	peerName := self class peerNameFromDomain:domain peer:peer.
+        peerName := self class peerNameFromDomain:domain peer:peer.
     ].
     ^ peerName
 !
@@ -3828,7 +3830,6 @@
     "
 ! !
 
-
 !Socket methodsFor:'specials'!
 
 linger:anIntegerOrNil
@@ -4104,7 +4105,6 @@
     ^ self setSocketOption:#'TCP_NODELAY' argument:aBoolean argument:nil.
 ! !
 
-
 !Socket methodsFor:'waiting'!
 
 waitForNewConnectionOrDataOnAny:otherConnections timeout:timeoutSeconds