--- a/FileApplicationNoteBook.st	Mon Sep 11 12:46:30 2006 +0200
+++ b/FileApplicationNoteBook.st	Mon Sep 11 12:46:33 2006 +0200
@@ -873,6 +873,27 @@
         ]
 !
 
+modeLabelMenu       
+    |app|
+
+    (app := self selectedApplication) notNil ifTrue:[
+        ^ app modeLabelMenu
+    ].
+    ^ nil
+
+    "Created: / 11-09-2006 / 12:33:27 / cg"
+!
+
+modeLabelMenuHolder
+    ^ self 
+        aspectFor:#modeLabelMenuHolder 
+        ifAbsent:[
+            IndirectValue for:(nil asValue)
+        ]
+
+    "Created: / 11-09-2006 / 12:28:08 / cg"
+!
+
 privateTabList
 
     privateTabList isNil ifTrue:[
@@ -913,13 +934,15 @@
 
     |app|
 
-    app := canvasHolder value application.
+    app := self selectedApplication.
 
     self cursorLineLabelHolder valueHolder: (app cursorLineLabelHolder).
     self cursorColLabelHolder valueHolder: (app cursorColLabelHolder).
     self modeLabelHolder valueHolder: (app modeLabelHolder).
     self fileEncodingHolder valueHolder: (app fileEncodingHolder).
     self lockFileEncodingHolder valueHolder: (app lockFileEncodingHolder).
+
+    "Modified: / 11-09-2006 / 12:44:07 / cg"
 !
 
 update:something with:aParameter from:changedObject
@@ -4704,6 +4727,24 @@
         argument:editView cursorLineHolder.
 !
 
+editModeInsert
+    editView editModeInsert
+
+    "Created: / 11-09-2006 / 12:46:50 / cg"
+!
+
+editModeInsertAndSelect
+    editView editModeInsertAndSelect
+
+    "Created: / 11-09-2006 / 12:47:01 / cg"
+!
+
+editModeOverwrite
+    editView editModeOverwrite
+
+    "Created: / 11-09-2006 / 12:46:47 / cg"
+!
+
 enableHexToggle
     enableHexToggle isNil ifTrue:[
         enableHexToggle := true asValue.
@@ -4769,6 +4810,12 @@
     ^ editView modeLabelHolder.
 !
 
+modeLabelMenu
+    ^ FileBrowserV2 editModeInfoLabelMenu
+
+    "Created: / 11-09-2006 / 12:36:26 / cg"
+!
+
 modifiedChannel
     modifiedChannel isNil ifTrue:[
         modifiedChannel := false asValue.
@@ -5548,5 +5595,5 @@
 !FileApplicationNoteBook class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.203 2006-07-25 09:25:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.204 2006-09-11 10:46:33 cg Exp $'
 ! !