--- a/AbstractDirectoryBrowser.st	Wed Apr 27 12:06:41 2005 +0200
+++ b/AbstractDirectoryBrowser.st	Wed Apr 27 12:22:01 2005 +0200
@@ -155,23 +155,27 @@
 !AbstractDirectoryBrowser methodsFor:'file actions'!
 
 doCopy
-    "copy current selected files/directories
-    "
+    "copy the selected files/directories to the clipBoard"
 
     self copyFilesToClipBoard:(self selectedFiles).
 !
 
 doCut
-    "cut current selected files/directories"
+    "cut the selected files/directories to the clipBoard"
 
     self cutFilesToClipBoard:(self selectedFiles).
 !
 
 doDelete
-    "delete current selected files/directories
-    "
+    "delete the selected files/directories"
 
     self deleteFiles:(self selectedFiles copy).
+!
+
+doErase
+    "erase the selected files"
+
+    self eraseFiles:(self selectedFiles copy).
 ! !
 
 !AbstractDirectoryBrowser methodsFor:'selection'!
@@ -208,5 +212,5 @@
 !AbstractDirectoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.15 2005-04-14 09:13:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.16 2005-04-27 10:21:46 cg Exp $'
 ! !