DirectoryTreeBrowser.st
changeset 5064 6c5d1f6dc118
parent 5063 87f68877a3da
child 5093 cdea158c7e3a
--- a/DirectoryTreeBrowser.st	Thu Jul 31 10:54:11 2003 +0200
+++ b/DirectoryTreeBrowser.st	Thu Jul 31 10:55:22 2003 +0200
@@ -511,8 +511,9 @@
         browser openEditor.
     ] ifFalse:[
         browser openEditorAction:self openEditorAction.
-        browser openEditor.
-        browser openEditorAction:nil.
+        [browser openEditor.] ensure:[
+            browser openEditorAction:nil.
+        ].
     ].
 !
 
@@ -1280,5 +1281,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.70 2003-07-31 08:54:11 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.71 2003-07-31 08:55:22 penk Exp $'
 ! !