--- a/Tools_NavigationState.st Fri Oct 02 14:48:53 2009 +0200
+++ b/Tools_NavigationState.st Fri Oct 02 14:49:08 2009 +0200
@@ -31,7 +31,7 @@
sortVariablesBy editModeHolder scrollableCodeView specialEditors
selectedEditorNoteBookTabIndexHolder editorNoteBookListHolder
editorNoteBookCanvasHolder codeView stringSearchToolView
- noteBookView'
+ noteBookView inheritanceView'
classVariableNames:''
poolDictionaries:''
category:'Interface-Browsers-New'
@@ -357,6 +357,18 @@
^ codeView
!
+inheritanceView
+ inheritanceView isNil ifTrue:[
+ |classTreeView scrolledView|
+
+ classTreeView := ClassTreeGraphView new.
+ scrolledView := HVScrollableView forView:classTreeView.
+ classTreeView middleButtonMenu:nil.
+ inheritanceView := scrolledView
+ ].
+ ^ inheritanceView
+!
+
scrollableCodeView
scrollableCodeView isNil ifTrue:[
scrollableCodeView := self setUpScrollableCodeView.
@@ -1283,9 +1295,9 @@
!NavigationState class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.29 2009-10-01 16:21:26 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.30 2009-10-02 12:49:08 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.29 2009-10-01 16:21:26 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.30 2009-10-02 12:49:08 cg Exp $'
! !