--- a/FileSelectionList.st	Tue Sep 22 15:37:06 1998 +0200
+++ b/FileSelectionList.st	Tue Sep 22 15:43:57 1998 +0200
@@ -902,7 +902,7 @@
         timeStamp := directory modificationTime.
         directoryId := directory id.
         directoryName := directory pathName.
-        directoryContents := directory fullDirectoryContents sort.
+        directoryContents := (directory fullDirectoryContents ? #()) sort.
         directoryFileTypes := OrderedCollection new.
         directoryContents do:[:name | 
             |f|
@@ -965,7 +965,7 @@
     self cursor:oldCursor.
 
     "Modified: / 18.9.1997 / 23:43:52 / stefan"
-    "Modified: / 22.9.1998 / 12:33:24 / cg"
+    "Modified: / 22.9.1998 / 14:44:02 / cg"
 !
 
 visibleLineNeedsSpecialCare:visLineNr
@@ -1011,5 +1011,5 @@
 !FileSelectionList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.42 1998-09-22 11:17:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.43 1998-09-22 13:43:57 cg Exp $'
 ! !