# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1370340615 -7200
# Node ID 2cdd97a7d9d390428f13c5d23381c830526a1f3b
# Parent  50a3b78ef6e7683cd1c89716bc1d850f52581d32
class: AbstractFileBrowser
changed: #currentSelectedFiles

diff -r 50a3b78ef6e7 -r 2cdd97a7d9d3 AbstractFileBrowser.st
--- 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 $'
 ! !