--- a/Tools_InheritanceClassList.st	Tue Mar 28 17:25:29 2006 +0200
+++ b/Tools_InheritanceClassList.st	Tue Mar 28 17:27:25 2006 +0200
@@ -161,6 +161,12 @@
 !InheritanceClassList methodsFor:'private'!
 
 defaultSlaveModeValue
+    |mode|
+
+    mode := self topApplication perform:#initialOrganizerMode ifNotUnderstood:nil.
+    mode == OrganizerCanvas organizerModeClassInheritance ifTrue:[^ false].
+    mode isNil ifTrue:[^ false].
+
     self organizerMode value == OrganizerCanvas organizerModeCategory ifTrue:[^ true].
     ^ false
 !
@@ -182,5 +188,5 @@
 !InheritanceClassList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_InheritanceClassList.st,v 1.3 2006-03-27 17:10:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_InheritanceClassList.st,v 1.4 2006-03-28 15:27:25 cg Exp $'
 ! !