# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1220699566 -7200
# Node ID 92ef5422f17aa11e1498fa9a654b3cb24552d2a3
# Parent  61a33963c2192eb32783f02ddc547c9729b13b9b
code reuse

diff -r 61a33963c219 -r 92ef5422f17a ProjectDefinition.st
--- a/ProjectDefinition.st	Sat Sep 06 12:45:31 2008 +0200
+++ b/ProjectDefinition.st	Sat Sep 06 13:12:46 2008 +0200
@@ -3346,10 +3346,7 @@
 
     |methods|
 
-    methods := OrderedCollection new.
-    Smalltalk allClassesDo:[:eachClass |
-        methods addAll:(eachClass extensionsFrom:aProjectID). 
-    ].
+    methods := Smalltalk allExtensionsForPackage:aProjectID.
     methods 
         sort:[:m1 :m2 | 
             |c1 c2|
@@ -4047,7 +4044,7 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.197 2008-09-05 17:57:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.198 2008-09-06 11:12:46 cg Exp $'
 ! !
 
 ProjectDefinition initialize!