--- a/MemoryUsageView.st	Fri Jul 24 10:58:47 2015 +0200
+++ b/MemoryUsageView.st	Fri Jul 24 11:00:04 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1992 by Claus Gittinger
 	      All Rights Reserved
@@ -642,7 +640,7 @@
         ].
         aBlock value:insts
     ] ifFalse:[
-        ObjectMemory allInstancesOf:class do:aBlock.
+        aBlock value:(class allInstances).
     ].
 
     "Created: / 11-05-2011 / 14:36:00 / cg"