--- a/NewLauncher.st Tue Feb 26 11:24:21 2008 +0100
+++ b/NewLauncher.st Tue Feb 26 11:24:29 2008 +0100
@@ -2694,136 +2694,141 @@
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: 'Redraw All'
- #translateLabel: true
- #value: #redrawAllWindows
- #activeHelpKey: #windowsRedrawAll
+ #(Menu
+ (
+ (MenuItem
+ activeHelpKey: windowsRedrawAll
+ label: 'Redraw All'
+ itemValue: redrawAllWindows
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Iconify All'
- #translateLabel: true
- #value: #iconifyAllWindows
- #activeHelpKey: #windowsIconifyAll
+ (MenuItem
+ activeHelpKey: windowsIconifyAll
+ label: 'Iconify All'
+ itemValue: iconifyAllWindows
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Deiconify All'
- #translateLabel: true
- #value: #deIconifyAllWindows
- #activeHelpKey: #windowsDeiconifyAll
+ (MenuItem
+ activeHelpKey: windowsDeiconifyAll
+ label: 'Deiconify All'
+ itemValue: deIconifyAllWindows
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Migrate All To...'
- #translateLabel: true
- #value: #migrateAllWindows
- #activeHelpKey: #windowsMigrateAllWindows
+ (MenuItem
+ activeHelpKey: windowsMigrateAllWindows
+ label: 'Migrate All To...'
+ itemValue: migrateAllWindows
+ translateLabel: true
)
- #(#MenuItem
- #label: '-'
+ (MenuItem
+ label: '-'
)
- #(#MenuItem
- #label: 'Window Tree'
- #translateLabel: true
- #value: #startWindowTreeView
- #activeHelpKey: #windowsViewTree
+ (MenuItem
+ activeHelpKey: windowsViewTree
+ label: 'Window Tree'
+ itemValue: startWindowTreeView
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Window Tree (All Windows)'
- #translateLabel: true
- #value: #openApplication:
- #activeHelpKey: #windowsViewTreeAllViews
- #argument: 'WindowTreeView'
+ (MenuItem
+ activeHelpKey: windowsViewTreeAllViews
+ label: 'Window Tree (All Windows)'
+ itemValue: openApplication:
+ translateLabel: true
+ argument: 'WindowTreeView'
+ )
+ (MenuItem
+ activeHelpKey: windowsViewTreeAllScreens
+ label: 'Window Tree (All on All Screens)'
+ itemValue: startWindowTreeViewForAll
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Window Tree (All on All Screens)'
- #translateLabel: true
- #value: #startWindowTreeViewForAll
- #activeHelpKey: #windowsViewTreeAllScreens
+ (MenuItem
+ label: 'Fly-By Information'
+ itemValue: showFlyByWindowInformation
+ translateLabel: true
)
- #(#MenuItem
- #label: '-'
+ (MenuItem
+ label: '-'
)
- #(#MenuItem
- #label: 'Select and Inspect'
- #translateLabel: true
- #value: #viewInspect
- #activeHelpKey: #windowsSelectAndInspect
+ (MenuItem
+ activeHelpKey: windowsSelectAndInspect
+ label: 'Select and Inspect'
+ itemValue: viewInspect
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Select and Destroy'
- #translateLabel: true
- #value: #viewDestroy
- #activeHelpKey: #windowsSelectAndDestroy
+ (MenuItem
+ activeHelpKey: windowsSelectAndDestroy
+ label: 'Select and Destroy'
+ itemValue: viewDestroy
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Select and Migrate To...'
- #translateLabel: true
- #value: #viewMigrate
- #activeHelpKey: #windowsSelectAndMigrate
+ (MenuItem
+ activeHelpKey: windowsSelectAndMigrate
+ label: 'Select and Migrate To...'
+ itemValue: viewMigrate
+ translateLabel: true
)
- #(#MenuItem
- #label: '-'
+ (MenuItem
+ label: '-'
)
- #(#MenuItem
- #label: 'Find and Raise...'
- #translateLabel: true
- #value: #findAndRaiseWindow
- #activeHelpKey: #windowsFindAndRaise
- #enabled: #enableDangerousMenuItemsInRemoteLauncher
+ (MenuItem
+ activeHelpKey: windowsFindAndRaise
+ enabled: enableDangerousMenuItemsInRemoteLauncher
+ label: 'Find by Name and Raise...'
+ itemValue: findAndRaiseWindow
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Find and Destroy...'
- #translateLabel: true
- #value: #findAndDestroyWindow
- #activeHelpKey: #windowsFindAndDestroy
- #enabled: #enableDangerousMenuItemsInRemoteLauncher
+ (MenuItem
+ activeHelpKey: windowsFindAndDestroy
+ enabled: enableDangerousMenuItemsInRemoteLauncher
+ label: 'Find by Name and Destroy...'
+ itemValue: findAndDestroyWindow
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Find and Migrate To...'
- #translateLabel: true
- #value: #findAndMigrateWindow
- #activeHelpKey: #windowsFindAndMigrate
+ (MenuItem
+ activeHelpKey: windowsFindAndMigrate
+ label: 'Find by Name and Migrate To...'
+ itemValue: findAndMigrateWindow
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Find and Migrate Back...'
- #translateLabel: true
- #value: #findAndMigrateWindowBack
- #activeHelpKey: #windowsFindAndMigrateBack
+ (MenuItem
+ activeHelpKey: windowsFindAndMigrateBack
+ label: 'Find by Name and Migrate Back...'
+ itemValue: findAndMigrateWindowBack
+ translateLabel: true
)
- #(#MenuItem
- #label: '-'
+ (MenuItem
+ label: '-'
)
- #(#MenuItem
- #label: 'Grab Window...'
- #translateLabel: true
- #value: #viewHardcopy
- #activeHelpKey: #windowsGrapWindow
+ (MenuItem
+ activeHelpKey: windowsGrapWindow
+ label: 'Grab Window...'
+ itemValue: viewHardcopy
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Grab Widget...'
- #translateLabel: true
- #value: #widgetHardcopy
- #activeHelpKey: #windowsGrapWidget
+ (MenuItem
+ activeHelpKey: windowsGrapWidget
+ label: 'Grab Widget...'
+ itemValue: widgetHardcopy
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Grab Screen...'
- #translateLabel: true
- #value: #fullScreenHardcopy
- #activeHelpKey: #windowsGrapScreen
+ (MenuItem
+ activeHelpKey: windowsGrapScreen
+ label: 'Grab Screen...'
+ itemValue: fullScreenHardcopy
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Grab Screen Area...'
- #translateLabel: true
- #value: #screenHardcopy
- #activeHelpKey: #windowsGrapScreenArea
+ (MenuItem
+ activeHelpKey: windowsGrapScreenArea
+ label: 'Grab Screen Area...'
+ itemValue: screenHardcopy
+ translateLabel: true
)
- #(#MenuItem
- #label: 'Grab Screen Area with Delay...'
- #translateLabel: true
- #value: #screenHardcopyWithDelay
- #activeHelpKey: #windowsGrapScreenArea
+ (MenuItem
+ activeHelpKey: windowsGrapScreenArea
+ label: 'Grab Screen Area with Delay...'
+ itemValue: screenHardcopyWithDelay
+ translateLabel: true
)
)
nil
@@ -4371,5 +4376,5 @@
!NewLauncher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.362 2008-02-04 14:49:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.363 2008-02-26 10:24:29 cg Exp $'
! !