--- a/FileBrowserV3.st	Fri Apr 13 14:15:47 2012 +0100
+++ b/FileBrowserV3.st	Fri Apr 13 19:16:04 2012 +0100
@@ -51,12 +51,30 @@
 
     ^ super helpSpec addPairsFrom:#(
 
+#copyFile
+''
+
+#cutFile
+''
+
+#deleteFile
+''
+
 #editFile
 ''
 
+#fileGotoBookmark
+''
+
+#fileHistory
+''
+
 #fileIn
 ''
 
+#pasteFile
+''
+
 )
 ! !
 
@@ -539,11 +557,21 @@
             labelImage: (ResourceRetriever ToolbarIconLibrary stxHomeIcon)
           )
          (MenuItem
+            activeHelpKey: fileGotoBookmark
+            label: 'Bookmarks'
+            translateLabel: true
+            isButton: true
+            isVisible: false
+            submenuChannel: gotoBookmarksMenu
+            labelImage: (ResourceRetriever ToolbarIconLibrary directoryBookmarksIcon)
+          )
+         (MenuItem
             activeHelpKey: fileHistory
             enabled: enableFileHistory
             label: 'File History'
             translateLabel: true
             isButton: true
+            isVisible: false
             submenuChannel: menuFileHistory
             labelImage: (ResourceRetriever ToolbarIconLibrary historyIcon)
           )
@@ -562,6 +590,50 @@
             label: '-'
           )
          (MenuItem
+            activeHelpKey: cutFile
+            enabled: hasSelection
+            label: 'Cut'
+            itemValue: cutFiles
+            translateLabel: true
+            isButton: true
+            isVisible: false
+            labelImage: (ResourceRetriever ToolbarIconLibrary cutFileIcon)
+          )
+         (MenuItem
+            activeHelpKey: copyFile
+            enabled: hasSelection
+            label: 'Copy'
+            itemValue: copyFiles
+            translateLabel: true
+            isButton: true
+            isVisible: false
+            labelImage: (ResourceRetriever ToolbarIconLibrary copyFileIcon)
+          )
+         (MenuItem
+            activeHelpKey: pasteFile
+            enabled: canPaste
+            label: 'Paste'
+            itemValue: pasteFiles
+            translateLabel: true
+            isButton: true
+            isVisible: false
+            labelImage: (ResourceRetriever ToolbarIconLibrary pasteFileIcon)
+          )
+         (MenuItem
+            activeHelpKey: deleteFile
+            enabled: hasSelection
+            label: 'Delete'
+            itemValue: deleteFiles
+            translateLabel: true
+            isButton: true
+            isVisible: false
+            labelImage: (ResourceRetriever ToolbarIconLibrary deleteFileIcon)
+          )
+         (MenuItem
+            label: '-'
+            isVisible: false
+          )
+         (MenuItem
             activeHelpKey: editFile
             label: 'Edit File'
             itemValue: doShowFileContents
@@ -580,14 +652,6 @@
             labelImage: (ResourceRetriever ToolbarIconLibrary fileInIcon)
           )
          (MenuItem
-            activeHelpKey: fileIn
-            label: 'File In'
-            itemValue: fileFileIn
-            translateLabel: true
-            isButton: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary fileInIcon)
-          )
-         (MenuItem
             activeHelpKey: openChangeBrowser
             enabled: hasFileSelection
             label: 'Changes Browser'
@@ -615,7 +679,7 @@
             itemValue: doMake
             translateLabel: true
             isButton: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary makeIcon)
+            labelImage: (ResourceRetriever ToolbarIconLibrary make24x24Icon3)
           )
          (MenuItem
             activeHelpKey: viewDetails
@@ -712,6 +776,30 @@
 
 !FileBrowserV3 methodsFor:'change & update'!
 
+update:something with:aParameter from:changedObject
+    "Invoked when an object that I depend upon sends a change notification."
+
+    changedObject == fileEntryFieldHolder ifTrue:[
+        self updateBookmark.
+    ].
+
+    super update:something with:aParameter from:changedObject
+
+    "Modified: / 13-04-2012 / 12:36:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+updateBookmark
+
+    | file bookmark |
+    file := fileEntryFieldHolder value.
+    file notEmptyOrNil ifFalse:[
+        bookmark := Bookmark forFile: file.
+    ].
+    self bookmarkHolder value: bookmark.
+
+    "Created: / 13-04-2012 / 12:37:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 updateToolVisibility
     |builder toolBar bookmarkBar infoBar filenameEntryField vPanel topOffset bottomOffset
      toolBarVisible bookmarkBarVisible filenameEntryFieldVisible infoBarVisible d|
@@ -763,5 +851,5 @@
 !FileBrowserV3 class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: FileBrowserV3.st 7969 2012-04-04 16:35:25Z vranyj1 $'
+    ^ '$Id: FileBrowserV3.st 7979 2012-04-13 18:16:04Z vranyj1 $'
 ! !