--- a/OrderedCollectionInspectorView.st	Mon Oct 09 12:48:55 2006 +0200
+++ b/OrderedCollectionInspectorView.st	Mon Oct 09 12:48:59 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libtool' }"
 
 InspectorView subclass:#OrderedCollectionInspectorView
@@ -141,9 +140,13 @@
 !
 
 derivedFields
-    ^ (Array with:('size' -> object size)) , super derivedFields
+    ^ Dictionary new
+        declareAllNewFrom:(super derivedFields ? #());
+        add:('-size' -> [ object size ]);
+        yourself
 
     "Created: / 22-08-2006 / 11:55:29 / cg"
+    "Modified: / 09-10-2006 / 12:27:32 / cg"
 !
 
 indexList 
@@ -189,5 +192,5 @@
 !OrderedCollectionInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.38 2006-08-22 09:57:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.39 2006-10-09 10:48:59 cg Exp $'
 ! !