--- a/FileSelectionBox.st	Sat May 25 13:23:35 1996 +0200
+++ b/FileSelectionBox.st	Sat May 25 13:33:36 1996 +0200
@@ -514,11 +514,11 @@
     selectingDirectory ifTrue:[
         selectionList changeDirectory.
         enterField contents:(selectionList directory pathName).
-        selectionList selection:nil.
+        selectionList setSelection:nil.
     ].
 
     "Created: 18.4.1996 / 18:38:21 / cg"
-    "Modified: 18.4.1996 / 18:47:34 / cg"
+    "Modified: 25.5.1996 / 12:27:05 / cg"
 !
 
 directorySelected
@@ -585,17 +585,17 @@
     ((selectionList directory typeOf:entry) == #directory) ifFalse:[
         selectingDirectory ifTrue:[
             enterField contents:(selectionList directory pathName).
-            selectionList selection:nil.
+            selectionList setSelection:nil.
             ^ self
         ]
     ].
     enterField contents:entry
 
-    "Modified: 18.4.1996 / 18:34:57 / cg"
+    "Modified: 25.5.1996 / 12:27:08 / cg"
 ! !
 
 !FileSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.34 1996-05-18 15:40:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.35 1996-05-25 11:33:36 cg Exp $'
 ! !