--- a/AbstractFileBrowser.st Tue Feb 21 17:51:46 2006 +0100
+++ b/AbstractFileBrowser.st Tue Feb 21 18:21:12 2006 +0100
@@ -1350,6 +1350,26 @@
#(Menu
(
(MenuItem
+ label: 'Open'
+ itemValue: doShowFileContents
+ translateLabel: true
+ )
+ (MenuItem
+ enabled: hasFileSelection
+ label: 'FileIn'
+ itemValue: fileFileIn
+ translateLabel: true
+ )
+ (MenuItem
+ enabled: hasFileSelection
+ label: 'FileIn to Namespace...'
+ itemValue: fileFileInToNameSpace
+ translateLabel: true
+ )
+ (MenuItem
+ label: '-'
+ )
+ (MenuItem
label: 'New'
translateLabel: true
submenuChannel: newMenu
@@ -1418,32 +1438,6 @@
)
(MenuItem
label: '-'
- )
- (MenuItem
- label: 'Operations'
- translateLabel: true
- submenuChannel: fileOpMenu
- keepLinkedMenu: true
- )
- (MenuItem
- label: 'Edit'
- itemValue: doShowFileContents
- translateLabel: true
- )
- (MenuItem
- enabled: hasFileSelection
- label: 'FileIn'
- itemValue: fileFileIn
- translateLabel: true
- )
- (MenuItem
- enabled: hasFileSelection
- label: 'FileIn to Namespace...'
- itemValue: fileFileInToNameSpace
- translateLabel: true
- )
- (MenuItem
- label: '-'
isVisible: javaSupportLoaded
)
(MenuItem
@@ -1825,6 +1819,12 @@
label: '-'
)
(MenuItem
+ label: 'File Operations'
+ translateLabel: true
+ submenuChannel: fileOpMenu
+ keepLinkedMenu: true
+ )
+ (MenuItem
label: 'File Utilities'
translateLabel: true
submenu:
@@ -7005,5 +7005,5 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.320 2006-02-21 16:51:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.321 2006-02-21 17:21:12 cg Exp $'
! !