author | Claus Gittinger <cg@exept.de> |
Sat, 28 Jan 2017 18:00:08 +0100 | |
changeset 17296 | e5381f8ed0fa |
parent 17295 | 1dde21e01475 |
child 17297 | 78fd75347bc3 |
--- a/Tools__ClassList.st Sat Jan 28 17:45:12 2017 +0100 +++ b/Tools__ClassList.st Sat Jan 28 18:00:08 2017 +0100 @@ -1579,7 +1579,9 @@ ]. ]. - (ownersAddedForTheirPrivateClassesOnly includes:eachClass) ifTrue:[ + (ownersAddedForTheirPrivateClassesOnly notNil + and:[ownersAddedForTheirPrivateClassesOnly includes:eachClass] + ) ifTrue:[ clr := Color grey. ].