diff -r a1ff606fca18 -r cb3e04bc2726 ProjectDefinition.st --- a/ProjectDefinition.st Wed Mar 26 11:12:53 2008 +0100 +++ b/ProjectDefinition.st Mon Mar 31 15:49:56 2008 +0200 @@ -161,7 +161,7 @@ |def| def := self definitionClassForPackage:eachPackageID. - def preRequisites do:[:eachPrerequisitePackageID| + def effectivePreRequisites do:[:eachPrerequisitePackageID| orderedTuples add:(Array with:eachPrerequisitePackageID with:eachPackageID). ]. ]. @@ -919,6 +919,18 @@ "Modified: / 18-08-2006 / 16:16:24 / cg" ! +effectivePreRequisites + "get the preRequisites, that are not excluded" + + |preRequisites| + + preRequisites := self preRequisites asSet. + preRequisites removeAllFoundIn:self excludedFromPreRequisites. + preRequisites remove:self package ifAbsent:[]. + + ^ preRequisites +! + extensionMethodNames_code ^ self extensionMethodNames_code_ignoreOldEntries:true @@ -3967,7 +3979,7 @@ !ProjectDefinition class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.177 2008-03-02 16:19:56 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.178 2008-03-31 13:49:56 fm Exp $' ! ! ProjectDefinition initialize!