--- a/MemoryUsageView.st	Sun Jul 29 20:36:34 2018 +0200
+++ b/MemoryUsageView.st	Mon Jul 30 12:16:17 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1992 by Claus Gittinger
 	      All Rights Reserved
@@ -273,7 +271,7 @@
                     ]
                 ] valueWithExit.
             ] ifFalse:[
-                insts := (insts asArray copyTo:limit)
+                insts := (insts asArray copyToMax:limit)
             ]
         ].
         insts := insts asArray.
@@ -283,6 +281,7 @@
     "Created: / 03-02-1998 / 00:03:22 / cg"
     "Modified: / 11-05-2011 / 14:33:04 / cg"
     "Modified: / 16-06-2011 / 16:14:40 / az"
+    "Modified: / 30-07-2018 / 11:14:47 / Claus Gittinger"
 !
 
 inspectInstances