#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Sat, 28 Jan 2017 18:00:08 +0100
changeset 17296 e5381f8ed0fa
parent 17295 1dde21e01475
child 17297 78fd75347bc3
#BUGFIX by cg class: Tools::ClassList changed: #nameListForClasses:
Tools__ClassList.st
--- 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.
                             ].