--- a/DirectoryContentsBrowser.st	Wed Apr 27 12:06:41 2005 +0200
+++ b/DirectoryContentsBrowser.st	Wed Apr 27 12:22:01 2005 +0200
@@ -548,6 +548,12 @@
             shortcutKey: Delete
           )
          (MenuItem
+            label: 'Erase'
+            itemValue: doErase
+            nameKey: erase
+            translateLabel: true
+          )
+         (MenuItem
             label: '-'
           )
          (MenuItem
@@ -3193,5 +3199,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.178 2005-04-14 09:13:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.179 2005-04-27 10:21:51 cg Exp $'
 ! !