--- a/FileBrowser.st	Tue Feb 26 14:01:56 2002 +0100
+++ b/FileBrowser.st	Tue Feb 26 14:04:37 2002 +0100
@@ -2247,7 +2247,7 @@
                                 aStream fileIn.
                             ].
                             Class addInfoRecord:('fileIn ' , fileName) 
-                        ] valueNowOrOnUnwindDo:[
+                        ] ensure:[
                             Compiler compileLazy:wasLazy.
                             aStream close
                         ]
@@ -2601,7 +2601,7 @@
                         ]
                     ]
                 ]
-            ] valueNowOrOnUnwindDo:[
+            ] ensure:[
                 |wg|
 
                 self label:myName; iconLabel:myName.
@@ -4607,7 +4607,7 @@
                 ]
             ].
         ].
-    ] valueNowOrOnUnwindDo:[
+    ] ensure:[
         lockUpdate := false.
         fileListView setSelection:nil.
 
@@ -5514,7 +5514,7 @@
                             "
                             Processor yield
                         ].
-                    ] valueNowOrOnUnwindDo:[
+                    ] ensure:[
                         stream shutDown "close". stream := nil.
                     ].
 
@@ -5529,7 +5529,7 @@
             ]
         ]
       ]
-    ] valueNowOrOnUnwindDo:[
+    ] ensure:[
         |wg|
 
         self label:myName; iconLabel:myName.
@@ -6520,7 +6520,7 @@
                     ]
                 ].
             ].
-        ] valueNowOrOnUnwindDo:[
+        ] ensure:[
             lockUpdate := false.
             fileListView setSelection:nil.
 
@@ -7789,5 +7789,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.460 2002-02-11 12:36:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.461 2002-02-26 13:04:37 cg Exp $'
 ! !