--- a/AbstractDirectoryBrowser.st	Fri Mar 28 20:09:38 2003 +0100
+++ b/AbstractDirectoryBrowser.st	Sat Mar 29 14:08:07 2003 +0100
@@ -119,7 +119,7 @@
 doDelete
     "delete current selected files/directories
     "
-    self deleteFiles:(self selectedFiles).
+    self deleteFiles:(self selectedFiles copy).
 ! !
 
 !AbstractDirectoryBrowser methodsFor:'selection'!
@@ -161,5 +161,5 @@
 !AbstractDirectoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.1 2003-03-24 16:59:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.2 2003-03-29 13:07:38 cg Exp $'
 ! !