--- a/FileSelectionList.st	Sat May 25 13:34:53 1996 +0200
+++ b/FileSelectionList.st	Sat May 25 14:23:18 1996 +0200
@@ -802,7 +802,7 @@
         warnMessage notNil ifTrue:[
             self warn:(resources string:warnMessage with:entry).
         ].
-        self deselect
+        self setSelection:nil
     ] ifTrue:[
         self directory:newDir.
         entry = '..' ifTrue:[
@@ -811,7 +811,7 @@
     ].
 
     "Created: 4.3.1996 / 17:45:18 / cg"
-    "Modified: 4.3.1996 / 18:10:17 / cg"
+    "Modified: 25.5.1996 / 13:02:53 / cg"
 !
 
 selectionIsDirectory
@@ -957,5 +957,5 @@
 !FileSelectionList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.30 1996-05-18 15:40:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.31 1996-05-25 12:23:18 cg Exp $'
 ! !