--- a/FileDialog.st	Tue Jul 13 10:40:39 2004 +0200
+++ b/FileDialog.st	Tue Jul 13 15:09:44 2004 +0200
@@ -1300,6 +1300,9 @@
         fn := changedObject value asFilename.
         (fn exists) ifFalse:[^ self].
         treeBrowser currentFileNameHolder value:(OrderedCollection with:fn) withoutNotifying:self.
+        fn isDirectory ifTrue:[
+            treeBrowser expandEnforceSelectedItems.
+        ].
     ].
     ^ super update:something with:aParameter from:changedObject
 ! !
@@ -1508,5 +1511,5 @@
 !FileDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileDialog.st,v 1.70 2004-06-24 09:25:42 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileDialog.st,v 1.71 2004-07-13 13:09:44 penk Exp $'
 ! !