diff -r 85890687ff9c -r 3eea1002b141 Tools__ClassList.st --- a/Tools__ClassList.st Fri Jan 20 20:18:19 2017 +0000 +++ b/Tools__ClassList.st Wed Jan 25 19:02:59 2017 +0000 @@ -1645,11 +1645,17 @@ "/ onDevice:self window device) "/ string:nm "/ ]. - markApplicationsHolder value == true ifTrue:[ - icon := self iconForClass:eachClass theNonMetaclass. - icon isNil ifTrue:[ - icon := SystemBrowser emptyIcon - ]. + eachClass isObsolete ifTrue:[ + icon := SystemBrowser doNotEnterIcon. + ] ifFalse:[ + markApplicationsHolder value == true ifTrue:[ + icon := self iconForClass:eachClass theNonMetaclass. + icon isNil ifTrue:[ + "/ icon := SystemBrowser emptyIcon + ]. + ] + ]. + icon notNil ifTrue:[ nm := LabelAndIcon icon:icon string:nm ]. nm