--- a/XWorkstation.st	Sun May 08 04:01:11 2016 +0200
+++ b/XWorkstation.st	Sun May 08 04:01:30 2016 +0200
@@ -6888,7 +6888,7 @@
 !
 
 encodingOf:aFontId
-    "the fonts encoding - if the font does not provide that info,
+    "the font's encoding - if the font does not provide that info,
      return nil (and assume #ascii, which is a subset of #iso8859-1)."
 
     |props reg enc coll|
@@ -7404,7 +7404,7 @@
 !
 
 fullFontNameOf:aFontId
-    "the fonts fullName - this is very device specific and should only be
+    "the font's fullName - this is very device specific and should only be
      used for user feed-back (for example: in the fontPanel).
      If the display/font does not provide that info, return nil."
 
@@ -7412,15 +7412,15 @@
 
     props := self fontPropertiesOf:aFontId.
     #('FONT' 'FONT_NAME' 'FULL_NAME' 'FULLNAME' ) do:[:try |
-	|fullNameID|
-
-	fullNameID := props at:try ifAbsent:nil.
-	fullNameID notNil ifTrue:[
-	    fullName := self atomName:fullNameID.
-	    fullName notEmptyOrNil ifTrue:[
-		^ fullName
-	    ].
-	]
+        |fullNameID|
+
+        fullNameID := props at:try ifAbsent:nil.
+        fullNameID notNil ifTrue:[
+            fullName := self atomName:fullNameID.
+            fullName notEmptyOrNil ifTrue:[
+                ^ fullName
+            ].
+        ]
     ].
 
     ^ nil.