--- a/FindFileApplication.st	Mon Mar 22 23:01:08 2004 +0100
+++ b/FindFileApplication.st	Tue Mar 23 15:13:46 2004 +0100
@@ -1108,6 +1108,10 @@
             ContentsInfoCache := nil
         ].
     ].
+    filesToSearchFor size > 0 ifTrue:[
+        filesToSearchFor := filesToSearchFor asSet.
+    ].
+
     cache := ContentsInfoCache.
 
     dir := aDirectory asFilename.
@@ -1457,5 +1461,5 @@
 !FindFileApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.43 2004-03-22 17:09:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.44 2004-03-23 14:13:46 cg Exp $'
 ! !