--- a/DoWhatIMeanSupport.st	Fri Aug 30 10:41:22 2019 +0200
+++ b/DoWhatIMeanSupport.st	Fri Aug 30 10:42:22 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2002 by eXept Software AG
 	      All Rights Reserved
@@ -2414,7 +2412,7 @@
                 ] ifFalse:[                
                     valueInfo := ' (current value of expression)'.
                 ].
-                valueInfo := valueInfo withColor:(Color grey).
+                valueInfo := valueInfo allGray.
             ].
         ].    
     ].    
@@ -2515,7 +2513,7 @@
 "/
 "/    info := best storeString.
 "/    implClass notNil ifTrue:[
-"/        info := implClass name , ' » ' , info.
+"/        info := implClass name , ' » ' , info.
 "/    ].
 "/    self information:info.
 "/].
@@ -5250,7 +5248,7 @@
 "/
 "/    info := best storeString.
 "/    implClass notNil ifTrue:[
-"/        info := implClass name , ' » ' , info.
+"/        info := implClass name , ' » ' , info.
 "/    ].
 "/    self information:info.