--- a/AbstractFileBrowser.st Tue Jun 04 12:09:56 2013 +0200
+++ b/AbstractFileBrowser.st Tue Jun 04 12:10:15 2013 +0200
@@ -8674,7 +8674,7 @@
!
currentSelectedFiles
- ^ self currentSelectedObjects select:[:file | file isDirectory not].
+ ^ self currentSelectedObjects reject:[:file | file isDirectory].
"Modified: / 04-12-2006 / 13:14:39 / cg"
!
@@ -9192,10 +9192,10 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.522 2013-06-03 10:52:06 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.523 2013-06-04 10:10:15 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.522 2013-06-03 10:52:06 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.523 2013-06-04 10:10:15 cg Exp $'
! !