*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Tue, 18 May 2004 19:16:55 +0200
changeset 5866 d754a2b95e8f
parent 5865 24bc1718c04f
child 5867 ef786691f063
*** empty log message ***
FindFileApplication.st
--- a/FindFileApplication.st	Tue May 18 17:41:08 2004 +0200
+++ b/FindFileApplication.st	Tue May 18 19:16:55 2004 +0200
@@ -1229,8 +1229,8 @@
         remember ifTrue:[
             cache := self contentsInfoCache.
         ].
-    ].
-    setOfFilesToSearchFor := filesToSearchFor asSet.
+        setOfFilesToSearchFor := filesToSearchFor asSet.
+    ].    
 
     dir := aDirectory asFilename.
     self changeInformationTo:'Find File ' , '- searching .' , ((dir name) copyFrom:(self searchDirectoryHolder value asString size + 1)) toTab:false.
@@ -1608,5 +1608,5 @@
 !FindFileApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.56 2004-05-18 15:41:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.57 2004-05-18 17:16:55 cg Exp $'
 ! !