--- a/extensions.st Fri Sep 28 19:55:57 2012 +0200
+++ b/extensions.st Sun Sep 30 01:33:44 2012 +0200
@@ -353,6 +353,17 @@
^ super inspectorValueStringInListFor:anInspector
! !
+!Collection methodsFor:'inspecting'!
+
+inspectorValueStringInListFor:anInspector
+ "returns a string to be shown in the inspector's list"
+
+ self isEmpty ifTrue:[
+ ^ 'empty ' , self className
+ ].
+ ^ (super inspectorValueStringInListFor:anInspector)
+! !
+
!Color methodsFor:'inspecting'!
inspectorClass
@@ -1934,5 +1945,5 @@
!stx_libtool class methodsFor:'documentation'!
extensionsVersion_CVS
- ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.81 2012-09-09 20:44:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.82 2012-09-29 23:33:44 cg Exp $'
! !
\ No newline at end of file