--- a/FindFileApplication.st	Mon Dec 13 23:09:01 2004 +0100
+++ b/FindFileApplication.st	Tue Dec 14 15:57:45 2004 +0100
@@ -717,7 +717,7 @@
                     self enableSearch value:true.
                     self changeInformationTo:'Find File ' , '- done.' toTab:true.
                 ].
-            ] valueNowOrOnUnwindDo:[
+            ] ensure:[
                 thisSearchTask == searchTask ifTrue:[
                     searchTask := nil.
                     self enableStop value:false.
@@ -1612,5 +1612,5 @@
 !FindFileApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.66 2004-11-10 09:06:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.67 2004-12-14 14:57:45 cg Exp $'
 ! !