Mercurial Mercurial > hg > stx-libtool / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
NewLauncher.st
changeset 16930 1db8f8610422
parent 16889 a0d757c7ec2d
child 16931 8da61202e106 
--- a/NewLauncher.st	Wed Oct 12 15:02:22 2016 +0200
+++ b/NewLauncher.st	Wed Oct 12 15:03:11 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1997-1998 by eXept Software AG
 	      All Rights Reserved
@@ -2325,6 +2323,7 @@
     "Do not manually edit this!! If it is corrupted,
      the MenuEditor may not be able to read the specification."
 
+
     "
      MenuEditor new openOnClass:NewLauncher andSelector:#menuToolbar
      (Menu new fromLiteralArrayEncoding:(NewLauncher menuToolbar)) startUp
@@ -2332,133 +2331,122 @@
 
     <resource: #menu>
 
-    ^
+    ^ 
      #(Menu
-	(
-	 (MenuItem
-	    activeHelpKey: fileSaveImage
-	    enabled: enableDangerousMenuItemsInRemoteLauncher
-	    label: 'save image'
-	    itemValue: saveImage
-	    nameKey: saveImage
-	    translateLabel: true
-	    isButton: true
-	    labelImage: (ResourceRetriever ToolbarIconLibrary saveImageIcon)
-	  )
-	 (MenuItem
-	    activeHelpKey: fileFileBrowser
-	    label: 'open file browser'
-	    itemValue: openFileBrowser
-	    nameKey: fileBrowser
-	    translateLabel: true
-	    isButton: true
-	    isVisible: fileBrowserItemVisible
-	    submenuChannel: menuFileHistory
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startFileBrowserIcon)
-	  )
-	 (MenuItem
-	    label: '-'
-	  )
-	 (MenuItem
-	    activeHelpKey: toolsWorkspace
-	    label: 'open workspace'
-	    itemValue: openWorkspace
-	    nameKey: workspace
-	    translateLabel: true
-	    isButton: true
-	    submenuChannel: menuOpenWorkspaceTypes
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startWorkspaceIcon)
-	  )
-	 (MenuItem
-	    activeHelpKey: classesSystemBrowser
-	    label: 'open system browser'
-	    itemValue: openApplication:
-	    nameKey: systemBrowser
-	    translateLabel: true
-	    isButton: true
-	    isVisible: systemBrowserItemVisible
-	    submenuChannel: menuClassHistory
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startSystemBrowserIcon)
-	    argument: 'SystemBrowser'
-	  )
-	 (MenuItem
-	    activeHelpKey: classesSystemBrowserOnClass
-	    label: 'System Browser On Class'
-	    translateLabel: true
-	    isButton: true
-	    isVisible: false
-	    submenuChannel: menuClassHistory
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startSystemBrowserOnHistoryClassIcon)
-	  )
-	 (MenuItem
-	    activeHelpKey: toolsChangesBrowserOrNavigateToRecentChange
-	    label: 'open changes browser'
-	    itemValue: startChangesBrowser
-	    nameKey: changesBrowser
-	    translateLabel: true
-	    isButton: true
-	    submenuChannel: menuChangeHistory
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startChangesBrowserIcon)
-	  )
-	 (MenuItem
-	    label: '-'
-	  )
-	 (MenuItem
-	    activeHelpKey: toolsGUIPainter
-	    label: 'open GUI Builder'
-	    itemValue: openApplication:
-	    nameKey: guiBuilder
-	    translateLabel: true
-	    isButton: true
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startUIPainterIcon)
-	    argument: 'UIPainter'
-	  )
-	 (MenuItem
-	    activeHelpKey: toolsMenuEditor
-	    label: 'open menu editor'
-	    itemValue: openApplication:
-	    nameKey: menuEditor
-	    translateLabel: true
-	    isButton: true
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startMenuEditorIcon)
-	    argument: 'MenuEditor'
-	  )
-	 (MenuItem
-	    activeHelpKey: toolsImageEditor
-	    label: 'open image editor'
-	    itemValue: openApplication:
-	    nameKey: imageEditor
-	    translateLabel: true
-	    isButton: true
-	    labelImage: (ResourceRetriever ToolbarIconLibrary startImageEditorIcon)
-	    argument: 'ImageEditor'
-	  )
-	 (MenuItem
-	    label: ''
-	  )
-	 (MenuItem
-	    activeHelpKey: systemGarbageCollectAndCompress
-	    label: 'garbage collect and compress'
-	    itemValue: compressingGarbageCollect
-	    nameKey: garbageCollect
-	    translateLabel: true
-	    isButton: true
-	    isVisible: false
-	    labelImage: (ResourceRetriever ToolbarIconLibrary garbageCollectIcon)
-	  )
-	 (MenuItem
-	    activeHelpKey: helpSTXOnlineDocumentation
-	    label: 'help'
-	    itemValue: startDocumentationTool
-	    nameKey: help
-	    translateLabel: true
-	    isButton: true
-	    startGroup: right
-	    labelImage: (ResourceRetriever XPToolbarIconLibrary stxHelpIcon)
-	  )
-	 )
-	nil
-	nil
+        (
+         (MenuItem
+            activeHelpKey: fileSaveImage
+            enabled: enableDangerousMenuItemsInRemoteLauncher
+            label: 'save image'
+            itemValue: saveImage
+            nameKey: saveImage
+            isButton: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary saveImageIcon)
+          )
+         (MenuItem
+            activeHelpKey: fileFileBrowser
+            label: 'open file browser'
+            itemValue: openFileBrowser
+            nameKey: fileBrowser
+            isButton: true
+            isVisible: fileBrowserItemVisible
+            submenuChannel: menuFileHistory
+            labelImage: (ResourceRetriever ToolbarIconLibrary startFileBrowserIcon)
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            activeHelpKey: toolsWorkspace
+            label: 'open workspace'
+            itemValue: openWorkspace
+            nameKey: workspace
+            isButton: true
+            submenuChannel: menuOpenWorkspaceTypes
+            labelImage: (ResourceRetriever ToolbarIconLibrary startWorkspaceIcon)
+          )
+         (MenuItem
+            activeHelpKey: newSystemBrowser
+            label: 'open system browser'
+            itemValue: openApplication:
+            nameKey: systemBrowser
+            isButton: true
+            isVisible: systemBrowserItemVisible
+            submenuChannel: menuClassHistory
+            labelImage: (ResourceRetriever ToolbarIconLibrary startNewSystemBrowserIcon)
+            argument: 'Tools::NewSystemBrowser'
+          )
+         (MenuItem
+            activeHelpKey: classesSystemBrowserOnClass
+            label: 'System Browser On Class'
+            isButton: true
+            isVisible: false
+            submenuChannel: menuClassHistory
+            labelImage: (ResourceRetriever ToolbarIconLibrary startSystemBrowserOnHistoryClassIcon)
+          )
+         (MenuItem
+            activeHelpKey: toolsChangesBrowserOrNavigateToRecentChange
+            label: 'open changes browser'
+            itemValue: startChangesBrowser
+            nameKey: changesBrowser
+            isButton: true
+            submenuChannel: menuChangeHistory
+            labelImage: (ResourceRetriever ToolbarIconLibrary startChangesBrowserIcon)
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            activeHelpKey: toolsGUIPainter
+            label: 'open GUI Builder'
+            itemValue: openApplication:
+            nameKey: guiBuilder
+            isButton: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary startUIPainterIcon)
+            argument: 'UIPainter'
+          )
+         (MenuItem
+            activeHelpKey: toolsMenuEditor
+            label: 'open menu editor'
+            itemValue: openApplication:
+            nameKey: menuEditor
+            isButton: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary startMenuEditorIcon)
+            argument: 'MenuEditor'
+          )
+         (MenuItem
+            activeHelpKey: toolsImageEditor
+            label: 'open image editor'
+            itemValue: openApplication:
+            nameKey: imageEditor
+            isButton: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary startImageEditorIcon)
+            argument: 'ImageEditor'
+          )
+         (MenuItem
+            label: ''
+          )
+         (MenuItem
+            activeHelpKey: systemGarbageCollectAndCompress
+            label: 'garbage collect and compress'
+            itemValue: compressingGarbageCollect
+            nameKey: garbageCollect
+            isButton: true
+            isVisible: false
+            labelImage: (ResourceRetriever ToolbarIconLibrary garbageCollectIcon)
+          )
+         (MenuItem
+            activeHelpKey: helpSTXOnlineDocumentation
+            label: 'help'
+            itemValue: startDocumentationTool
+            nameKey: help
+            isButton: true
+            startGroup: right
+            labelImage: (ResourceRetriever XPToolbarIconLibrary stxHelpIcon)
+          )
+         )
+        nil
+        nil
       )
 !
hg/stx-libtool