--- a/NewInspectorList.st Thu Feb 04 15:40:52 1999 +0100
+++ b/NewInspectorList.st Thu Feb 04 20:00:55 1999 +0100
@@ -96,6 +96,8 @@
cls == Character ifTrue:[ ^ false ].
cls == Symbol ifTrue:[ ^ false ].
cls == String ifTrue:[ ^ false ].
+ cls == Float ifTrue:[ ^ false ].
+ cls == ShortFloat ifTrue:[ ^ false ].
cls allInstVarNames notEmpty ifTrue:[
^ true
@@ -107,7 +109,7 @@
].
^ false
-
+ "Modified: / 4.2.1999 / 20:00:11 / cg"
!
isTraceable:anInstance
@@ -188,6 +190,8 @@
].
self resizeTo:size.
]
+
+ "Modified: / 4.2.1999 / 20:00:38 / cg"
! !
!InspectorList methodsFor:'accessing contents'!