Tools_HierarchicalClassList.st
changeset 13094 3599cba929d5
parent 12595 24886909e066
child 13473 d8e9ed472e9f
child 13498 b8d845e42988
equal deleted inserted replaced
13093:7557612fea10 13094:3599cba929d5
   271     nm isNil ifTrue:[^ '???'].
   271     nm isNil ifTrue:[^ '???'].
   272 
   272 
   273     aClass isLoaded ifFalse:[
   273     aClass isLoaded ifFalse:[
   274         "/ nm := nm,(' (?) ' colorizeAllWith:Color grey).
   274         "/ nm := nm,(' (?) ' colorizeAllWith:Color grey).
   275     ] ifTrue:[
   275     ] ifTrue:[
       
   276         nm := (nm , ' ').
   276         aClass isAbstract ifTrue:[ nm := nm allItalic ].
   277         aClass isAbstract ifTrue:[ nm := nm allItalic ].
   277         nm := nm,((' (%1+%2) ' bindWith:(aClass methodDictionary size) with:(aClass class methodDictionary size)) 
   278         nm := nm,((' (%1+%2) ' bindWith:(aClass methodDictionary size) with:(aClass class methodDictionary size)) 
   278                                 colorizeAllWith:self class pseudoEntryForegroundColor).
   279                                 colorizeAllWith:self class pseudoEntryForegroundColor).
   279     ].
   280     ].
   280 
   281 
   313 ! !
   314 ! !
   314 
   315 
   315 !HierarchicalClassList class methodsFor:'documentation'!
   316 !HierarchicalClassList class methodsFor:'documentation'!
   316 
   317 
   317 version
   318 version
   318     ^ '$Header: /cvs/stx/stx/libtool/Tools_HierarchicalClassList.st,v 1.11 2013-03-30 19:12:41 cg Exp $'
   319     ^ '$Header: /cvs/stx/stx/libtool/Tools_HierarchicalClassList.st,v 1.12 2013-07-04 15:20:12 cg Exp $'
   319 ! !
   320 ! !
   320 
   321 
   321 
   322 
   322 HierarchicalClassList initialize!
   323 HierarchicalClassList initialize!