extensions.st
changeset 11827 7fc67c9afc32
parent 11792 1d9eb5a2ac82
child 11838 f0b57bc138d4
equal deleted inserted replaced
11826:9f79ac78ed1f 11827:7fc67c9afc32
   349 
   349 
   350     name notEmptyOrNil ifTrue:[
   350     name notEmptyOrNil ifTrue:[
   351         ^ name
   351         ^ name
   352     ].
   352     ].
   353     ^ super inspectorValueStringInListFor:anInspector
   353     ^ super inspectorValueStringInListFor:anInspector
       
   354 ! !
       
   355 
       
   356 !Collection methodsFor:'inspecting'!
       
   357 
       
   358 inspectorValueStringInListFor:anInspector
       
   359     "returns a string to be shown in the inspector's list"
       
   360 
       
   361     self isEmpty ifTrue:[
       
   362         ^ 'empty ' , self className
       
   363     ].
       
   364     ^ (super inspectorValueStringInListFor:anInspector)
   354 ! !
   365 ! !
   355 
   366 
   356 !Color methodsFor:'inspecting'!
   367 !Color methodsFor:'inspecting'!
   357 
   368 
   358 inspectorClass
   369 inspectorClass
  1932 ! !
  1943 ! !
  1933 
  1944 
  1934 !stx_libtool class methodsFor:'documentation'!
  1945 !stx_libtool class methodsFor:'documentation'!
  1935 
  1946 
  1936 extensionsVersion_CVS
  1947 extensionsVersion_CVS
  1937     ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.81 2012-09-09 20:44:34 cg Exp $'
  1948     ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.82 2012-09-29 23:33:44 cg Exp $'
  1938 ! !
  1949 ! !