shortkeys for browser & workspace;
removed a leftOver halt.
--- a/NewLauncher.st Wed Aug 16 14:05:47 2000 +0200
+++ b/NewLauncher.st Wed Aug 16 14:09:01 2000 +0200
@@ -774,7 +774,7 @@
#(#Menu
#(
#(#MenuItem
- #label: 'System Browser'
+ #label: '&System Browser'
#translateLabel: true
#nameKey: #systemBrowser
#value: #openApplication:
@@ -892,7 +892,7 @@
#(#Menu
#(
#(#MenuItem
- #label: 'Workspace'
+ #label: '&Workspace'
#nameKey: #workspace
#value: #openApplication:
#activeHelpKey: #toolsWorkspace
@@ -903,7 +903,7 @@
#label: '-'
)
#(#MenuItem
- #label: 'GUI Painter'
+ #label: 'G&UI Painter'
#nameKey: #guiPainter
#value: #openApplication:
#activeHelpKey: #toolsGUIPainter
@@ -1488,18 +1488,11 @@
#(#MenuItem
#label: 'Chicken Fun'
#translateLabel: true
+ #activeHelpKey: #chickenFun
#value: #startStopDemo:
- #activeHelpKey: #chickenFun
#argument: 'ChickenFun'
#indication: #chickenFunIsRunning
)
- #(#MenuItem
- #label: 'Chicks Eyes'
- #translateLabel: true
- #value: #openDemo:
- #activeHelpKey: #chickenFun
- #argument: 'ChickenEyes'
- )
)
nil
nil
@@ -3105,5 +3098,5 @@
!NewLauncher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.187 2000-08-16 12:05:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.188 2000-08-16 12:09:01 cg Exp $'
! !