--- a/FileSelectionBox.st	Tue Jun 16 12:37:19 1998 +0200
+++ b/FileSelectionBox.st	Tue Jun 16 15:11:34 1998 +0200
@@ -255,18 +255,18 @@
      fileSelection dialog. This will be used as default for the next dialog,
      if no explicit path is specified (see requestFileName:* methods)"
 
+    |f|
+
     LastFileSelectionDirectory notNil ifTrue:[
-        LastFileSelectionDirectory asFilename exists ifTrue:[
-            LastFileSelectionDirectory asFilename isDirectory ifTrue:[
-                ^ LastFileSelectionDirectory
-            ]
-        ].
-        LastFileSelectionDirectory := nil.
+        ((f := LastFileSelectionDirectory asFilename) exists 
+        and:[f isDirectory]) ifFalse:[
+            LastFileSelectionDirectory := nil.
+        ]
     ].
     ^ LastFileSelectionDirectory
 
     "Created: / 9.9.1997 / 10:03:17 / cg"
-    "Modified: / 15.6.1998 / 14:05:28 / cg"
+    "Modified: / 16.6.1998 / 15:11:20 / cg"
 !
 
 lastFileSelectionDirectory:aDirectoryString
@@ -634,5 +634,5 @@
 !FileSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.48 1998-06-15 13:05:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.49 1998-06-16 13:11:34 cg Exp $'
 ! !