--- a/FileSelectionItem.st	Mon Dec 23 09:14:58 2002 +0100
+++ b/FileSelectionItem.st	Mon Dec 23 15:11:32 2002 +0100
@@ -687,7 +687,8 @@
             ]
         ]
     ].
-  ^ list
+    list sort:[:a :b | a fileName name < b fileName name].
+    ^ list
 
     "Modified: / 24.9.1998 / 17:51:48 / cg"
 ! !
@@ -742,6 +743,7 @@
 !FileSelectionItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionItem.st,v 1.18 2001-10-24 08:51:44 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionItem.st,v 1.19 2002-12-23 14:11:32 cg Exp $'
 ! !
+
 FileSelectionItem initialize!