--- a/FileBrowser.st Wed Sep 26 12:00:58 2001 +0200
+++ b/FileBrowser.st Wed Sep 26 13:28:55 2001 +0200
@@ -706,31 +706,6 @@
#(#Menu
#(
#(#MenuItem
- #label: 'About'
- #translateLabel: true
- #labelImage: #(#ResourceRetriever #ToolApplicationModel #menuIcon)
- #submenu:
- #(#Menu
- #(
- #(#MenuItem
- #label: 'About Smalltalk/X...'
- #translateLabel: true
- #value: #showAboutSTX
- )
- #(#MenuItem
- #label: '-'
- )
- #(#MenuItem
- #label: 'About FileBrowser...'
- #translateLabel: true
- #value: #openAboutThisApplication
- )
- )
- nil
- nil
- )
- )
- #(#MenuItem
#label: 'File'
#translateLabel: true
#submenu:
@@ -747,9 +722,9 @@
#(#MenuItem
#label: 'Open'
#translateLabel: true
+ #isVisible: false
#value: #menuOpen
#enabled: #hasSelection
- #isVisible: false
)
#(#MenuItem
#label: 'Open selected Filename'
@@ -1072,6 +1047,14 @@
#value: #openHTMLDocument:
#argument: 'tools/fbrowser/TOP.html'
)
+ #(#MenuItem
+ #label: '-'
+ )
+ #(#MenuItem
+ #label: 'About FileBrowser...'
+ #translateLabel: true
+ #value: #openAboutThisApplication
+ )
)
nil
nil
@@ -7343,5 +7326,5 @@
!FileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.420 2001-09-26 08:51:30 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.421 2001-09-26 11:28:55 cg Exp $'
! !