--- a/OrderedCollectionInspectorView.st	Tue Jun 21 16:37:39 2005 +0200
+++ b/OrderedCollectionInspectorView.st	Tue Jun 21 18:02:02 2005 +0200
@@ -48,8 +48,10 @@
 !OrderedCollectionInspectorView methodsFor:'private'!
 
 baseInspectedObjectClass
+    (inspectedObject class inheritsFrom:OrderedCollection) ifFalse:[
+        ^ Object
+    ].
     ^ OrderedCollection
-
 !
 
 defaultLabel
@@ -179,5 +181,5 @@
 !OrderedCollectionInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.35 2004-02-02 13:57:52 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.36 2005-06-21 16:01:51 cg Exp $'
 ! !