--- a/InspectorView.st Thu Oct 08 14:01:26 2009 +0200
+++ b/InspectorView.st Thu Oct 08 14:23:55 2009 +0200
@@ -1322,7 +1322,7 @@
cls instSize > 0 ifTrue:[
derivedFieldList add:'-' , 'all inst vars' asText allItalic.
].
- (indexedList notNil and:[self showAllIndexedVarsInFieldList]) ifTrue:[
+ (indexedList notEmptyOrNil and:[self showAllIndexedVarsInFieldList]) ifTrue:[
derivedFieldList add:'-' , 'all indexed vars' asText allItalic.
].
@@ -2167,9 +2167,9 @@
!InspectorView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.194 2009-10-04 15:53:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.195 2009-10-08 12:23:55 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.194 2009-10-04 15:53:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.195 2009-10-08 12:23:55 cg Exp $'
! !