--- a/Class.st	Tue Jun 18 17:25:19 2019 +0200
+++ b/Class.st	Sat Jun 22 16:41:37 2019 +0200
@@ -1974,7 +1974,6 @@
     "Created: / 18-07-2011 / 09:14:38 / cg"
 ! !
 
-
 !Class methodsFor:'adding & removing'!
 
 removeFromSystem
@@ -2893,14 +2892,17 @@
     |encoder needsUtf8Encoding|
 
     "/ check if we need UTF8 encoding
-    needsUtf8Encoding := self withAllPrivateClasses contains:[:eachClass |
-                 eachClass instAndClassMethods contains:[:eachMethod |
-                        (methodFilter isNil or:[methodFilter value:eachMethod])
-                        and:[ 
-                            |src|
-                            src := eachMethod source.
-                            src notNil and:[src containsNon7BitAscii]
-                        ]]].
+    needsUtf8Encoding := 
+        self withAllPrivateClasses contains:[:someClass |
+             someClass instAndClassMethods contains:[:someMethod |
+                (methodFilter isNil or:[methodFilter value:someMethod])
+                and:[ 
+                    |src|
+                    src := someMethod source.
+                    src notNil and:[src containsNon7BitAscii]
+                ]
+            ]
+        ].
 
     needsUtf8Encoding ifTrue:[
         encoder := CharacterEncoder encoderForUTF8.
@@ -2915,6 +2917,7 @@
 
     "Modified: / 18-07-2011 / 09:17:17 / cg"
     "Modified (format): / 16-02-2017 / 20:34:59 / stefan"
+    "Modified (format): / 22-06-2019 / 16:41:21 / Claus Gittinger"
 !
 
 fileOutOn:outStreamArg withTimeStamp:stampIt withInitialize:initIt withDefinition:withDefinition methodFilter:methodFilter encoder:encoderOrNil