--- a/Tools__NewSystemBrowser.st	Mon Feb 13 14:46:55 2012 +0100
+++ b/Tools__NewSystemBrowser.st	Mon Feb 13 14:51:53 2012 +0100
@@ -7868,8 +7868,9 @@
             label: 'Remove...'
             itemValue: classMenuRemove
             translateLabel: true
+            shortcutKey: Delete
             labelImage: (ResourceRetriever ToolbarIconLibrary erase16x16Icon 'Remove...')
-            shortcutKey: Delete
+            ignoreShortcutKeys: true
           )
          (MenuItem
             label: '-'
@@ -7987,8 +7988,6 @@
         nil
         nil
       )
-
-    "Modified: / 13-02-2012 / 14:16:59 / cg"
 !
 
 classNewHaskellClassSlice
@@ -11083,13 +11082,12 @@
             translateLabel: true
             shortcutKey: Delete
             labelImage: (ResourceRetriever ToolbarIconLibrary erase16x16Icon 'Remove...')
-          )
-         )
-        nil
-        nil
-      )
-
-    "Modified: / 13-02-2012 / 14:15:46 / cg"
+            ignoreShortcutKeys: true
+          )
+         )
+        nil
+        nil
+      )
 !
 
 selectorMenuFileOutPrintOutSlice
@@ -55785,11 +55783,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1709 2012-02-13 13:46:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1710 2012-02-13 13:51:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1709 2012-02-13 13:46:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1710 2012-02-13 13:51:53 cg Exp $'
 !
 
 version_SVN