--- a/Tools__NewSystemBrowser.st	Mon Feb 13 14:09:39 2012 +0100
+++ b/Tools__NewSystemBrowser.st	Mon Feb 13 14:19:01 2012 +0100
@@ -7869,6 +7869,7 @@
             itemValue: classMenuRemove
             translateLabel: true
             labelImage: (ResourceRetriever ToolbarIconLibrary erase16x16Icon 'Remove...')
+            shortcutKey: Delete
           )
          (MenuItem
             label: '-'
@@ -7987,7 +7988,7 @@
         nil
       )
 
-    "Modified: / 11-02-2012 / 11:17:55 / cg"
+    "Modified: / 13-02-2012 / 14:16:59 / cg"
 !
 
 classNewHaskellClassSlice
@@ -11080,12 +11081,15 @@
             label: 'Remove...'
             itemValue: selectorMenuRemove
             translateLabel: true
+            shortcutKey: Delete
             labelImage: (ResourceRetriever ToolbarIconLibrary erase16x16Icon 'Remove...')
           )
          )
         nil
         nil
       )
+
+    "Modified: / 13-02-2012 / 14:15:46 / cg"
 !
 
 selectorMenuFileOutPrintOutSlice
@@ -55757,11 +55761,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1707 2012-02-13 13:09:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1708 2012-02-13 13:19:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1707 2012-02-13 13:09:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1708 2012-02-13 13:19:01 cg Exp $'
 !
 
 version_SVN