--- a/NewLauncher.st	Mon Jan 07 14:33:12 2008 +0100
+++ b/NewLauncher.st	Mon Jan 07 14:34:51 2008 +0100
@@ -1927,35 +1927,30 @@
             translateLabel: true
             submenuChannel: aboutMenu
             labelImage: (ResourceRetriever nil menuIcon)
-            keepLinkedMenu: true
           )
          (MenuItem
             label: '&File'
             nameKey: file
             translateLabel: true
             submenuChannel: fileMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'Classes'
             nameKey: classes
             translateLabel: true
             submenuChannel: classesMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'Tools'
             nameKey: tools
             translateLabel: true
             submenuChannel: toolsMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'System'
             nameKey: system
             translateLabel: true
             submenuChannel: systemMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'Settings'
@@ -1963,21 +1958,18 @@
             translateLabel: true
             isVisible: useOldSettingsApplication
             submenuChannel: settingsMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'Windows'
             nameKey: windows
             translateLabel: true
             submenuChannel: windowsMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'Demos'
             nameKey: demos
             translateLabel: true
             submenuChannel: demosMenu
-            keepLinkedMenu: true
           )
          (MenuItem
             label: 'MENU_Help'
@@ -1991,8 +1983,6 @@
         nil
         nil
       )
-
-    "Modified: / 23-10-2006 / 23:11:34 / cg"
 !
 
 menuToolbar
@@ -2525,6 +2515,13 @@
             translateLabel: true
           )
          (MenuItem
+            activeHelpKey: toolsOOM
+            label: 'Code Metrics Browser'
+            itemValue: startOOMBrowser
+            nameKey: startOOMBrowser
+            translateLabel: true
+          )
+         (MenuItem
             activeHelpKey: toolsSmaCC
             label: 'SmaCC ParserGenerator'
             itemValue: startSmaCCParserGenerator
@@ -4125,6 +4122,13 @@
     "Created: / 12-11-2006 / 16:07:12 / cg"
 !
 
+startOOMBrowser
+    self openApplication:'OOM::MetricVisualizer'
+
+    "Created: / 23-10-2006 / 16:00:25 / cg"
+    "Modified: / 23-10-2006 / 20:38:34 / cg"
+!
+
 startToDoListBrowser
     self openApplication:'Tools::ToDoListBrowser'
 
@@ -4361,5 +4365,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.358 2007-12-04 08:26:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.359 2008-01-07 13:34:51 cg Exp $'
 ! !