--- a/ProjectDefinition.st	Fri Aug 18 18:59:49 2006 +0200
+++ b/ProjectDefinition.st	Fri Aug 18 19:02:07 2006 +0200
@@ -1241,7 +1241,7 @@
 searchForClasses
 
     ^ (self searchForClassesWithProject: self package) 
-        asSortedCollection:[:a :b | a name < b name]
+        asOrderedCollection sort:[:a :b | a name < b name]
 
     "
      self searchForClasses
@@ -1522,5 +1522,5 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.17 2006-08-18 16:59:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.18 2006-08-18 17:02:07 cg Exp $'
 ! !