--- a/UserPreferences.st	Thu Aug 11 16:49:24 2016 +0200
+++ b/UserPreferences.st	Thu Aug 11 19:00:34 2016 +0200
@@ -765,11 +765,11 @@
         AbstractSourceCodeManager availableManagers do:[:eachManager |
             eachManager savePreferencesOn:s
         ].
-        
+
         userPrefs useSystemLanguage ifFalse:[
             s nextPutAll:('Smalltalk language:',UserPreferences current language storeString).
             s nextPutLine:(' territory:',UserPreferences current languageTerritory storeString,'.').
-        ].    
+        ].
         s syncData.
         userPrefs beUnmodified.
     ].
@@ -1967,68 +1967,68 @@
     "tells view classes about changed font preferences"
 
     |dict fn getFont|
-    
+
     dict := self at:#fontPreferences.
     dict isNil ifTrue:[^ self].
-    
-    getFont := 
+
+    getFont :=
         [:key|
             |s fn|
-            
+
             s := dict at:key ifAbsent:nil.
             s notNil ifTrue:[
                 fn := Object readFrom:s.
                 self useXftFontsOnly ifTrue:[
                     fn := XftFontDescription for:fn
-		    "/ cg: don't allocate on the display, because it takes
-		    "/ dam long sometimes when Xft fonts are used.
-		    "/ startup feels better, if we do it lazy.
-                ] ifFalse:[    
+                    "/ cg: don't allocate on the display, because it takes
+                    "/ dam long sometimes when Xft fonts are used.
+                    "/ startup feels better, if we do it lazy.
+                ] ifFalse:[
                     Display notNil ifTrue:[fn := fn onDevice:Display].
-		]
+                ]
             ].
             fn
         ].
-    
+
     fn := getFont value:#Other.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         SimpleView withAllSubclasses do:[:cls | cls defaultFont:fn].
     ].
-    
+
     fn := getFont value:#Label.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         Label defaultFont:fn.
         CheckBox defaultFont:fn.
     ].
-    
+
     fn := getFont value:#Button.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         Button defaultFont:fn.
         Toggle defaultFont:fn.
     ].
-    
+
     fn := getFont value:#Text.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         TextView withAllSubclasses do:[:cls | cls defaultFont:fn].
     ].
-    
+
     fn := getFont value:#InputField.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         EditField withAllSubclasses do:[:cls | cls defaultFont:fn].
     ].
-    
+
     fn := getFont value:#List.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         SelectionInListView withAllSubclasses do:[:cls | cls defaultFont:fn].
     ].
-    
+
     fn := getFont value:#Tooltip.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         ActiveHelpView withAllSubclasses do:[:cls | cls defaultFont:fn].
     ].
-    
+
     fn := getFont value:#Menu.
-    fn notNil ifTrue:[    
+    fn notNil ifTrue:[
         ListView defaultFont:fn.
         MenuView defaultFont:fn.
         MenuPanel defaultFont:fn.
@@ -4153,7 +4153,7 @@
 generateCommentsForGetters
     "return true if comments for simple getters are to be generated (by the codeGenerator tool).
      The default is now false, as these look stupid in the browser and were only generated
-     for the HTMLDocumentGenerator, which is not able  to generate these comments on the fly."
+     for the HTMLDocumentGenerator, which is not able to generate these comments on the fly."
 
     ^ self generateComments and:[self at:#generateCommentsForGetters ifAbsent:false].
 
@@ -4165,7 +4165,7 @@
 generateCommentsForGetters:aBoolean
     "true if comments for simple getters are to be generated (by the codeGenerator tool).
      The default is now false, as these look stupid in the browser and were only generated
-     for the HTMLDocumentGenerator, which is not able  to generate these comments on the fly."
+     for the HTMLDocumentGenerator, which is not able to generate these comments on the fly."
 
     self at:#generateCommentsForGetters put:aBoolean.
 
@@ -4177,7 +4177,7 @@
 generateCommentsForSetters
     "return true if comments for simple setters are to be generated (by the codeGenerator tool).
      The default is now false, as these look stupid in the browser and were only generated
-     for the HTMLDocumentGenerator, which is not able  to generate these comments on the fly."
+     for the HTMLDocumentGenerator, which is not able to generate these comments on the fly."
 
     ^ self generateComments and:[self at:#generateCommentsForSetters ifAbsent:false].
 
@@ -4189,7 +4189,7 @@
 generateCommentsForSetters:aBoolean
     "true if comments for simple setters are to be generated (by the codeGenerator tool).
      The default is now false, as these look stupid in the browser and were only generated
-     for the HTMLDocumentGenerator, which is not able  to generate these comments on the fly."
+     for the HTMLDocumentGenerator, which is not able to generate these comments on the fly."
 
     self at:#generateCommentsForSetters put:aBoolean.
 
@@ -5132,7 +5132,7 @@
 debuggerLogFile:aFilename
     "if non nil, any entered debugger writes a backrace to that logfile.
      This is useful to record all session-problems"
-     
+
     ^ self at:#debuggerLogFile put:aFilename
 
     "
@@ -5389,7 +5389,7 @@
 useJavaCompletionEngineSimple
     "/ switch to false, when the JavaCompletionEngine is
     "/ finished.
-    
+
     ^ true
 !