--- a/Tools_NavigationState.st	Sat Oct 03 15:42:26 2009 +0200
+++ b/Tools_NavigationState.st	Sat Oct 03 15:43:45 2009 +0200
@@ -31,7 +31,7 @@
 		sortVariablesBy editModeHolder scrollableCodeView specialEditors
 		selectedEditorNoteBookTabIndexHolder editorNoteBookListHolder
 		editorNoteBookCanvasHolder codeView stringSearchToolView
-		noteBookView inheritanceView'
+		noteBookView inheritanceView documentationView'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Browsers-New'
@@ -353,6 +353,16 @@
     ].
 !
 
+documentationView
+    |textView|
+
+    documentationView isNil ifTrue:[
+        textView := CodeView new.
+        documentationView := HVScrollableView forView:textView.
+    ].
+    ^ documentationView
+!
+
 getCodeView
     ^ codeView
 !
@@ -1295,9 +1305,9 @@
 !NavigationState class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.30 2009-10-02 12:49:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.31 2009-10-03 13:43:45 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.30 2009-10-02 12:49:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.31 2009-10-03 13:43:45 cg Exp $'
 ! !