#DOCUMENTATION by cg
class: ProjectDefinition class
comment/format in:
#whoReferences:
#whoReferencesSorted:
--- a/ProjectDefinition.st Thu Aug 03 16:41:13 2017 +0200
+++ b/ProjectDefinition.st Thu Aug 03 16:45:38 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 2006 by eXept Software AG
All Rights Reserved
@@ -2896,6 +2894,7 @@
"Created: / 18-08-2006 / 12:51:38 / cg"
! !
+
!ProjectDefinition class methodsFor:'description - project information'!
applicationAdditionalIconFileNames
@@ -4976,6 +4975,7 @@
^ self subProjectMakeCallsUsing:'call vcmake %1 %2'.
! !
+
!ProjectDefinition class methodsFor:'file templates'!
autopackage_default_dot_apspec
@@ -8022,28 +8022,30 @@
whoReferences:aPackageString
"answer, which package references directly or indirectly a package defined by aPackageString"
- |referers|
-
- referers := OrderedCollection new.
+ |referrers|
+
+ referrers := OrderedCollection new.
self allSubclassesDo:[:eachPackageDefinitionClass|
(eachPackageDefinitionClass allPreRequisites includes:aPackageString) ifTrue:[
- referers add:eachPackageDefinitionClass.
+ referrers add:eachPackageDefinitionClass.
]
].
- ^ referers.
+ ^ referrers.
"
self whoReferences:'stx:libview3'
self whoReferences:'stx:libwidg3'
self whoReferences:'stx:libbasic'
"
+
+ "Modified (format): / 02-08-2017 / 18:38:27 / cg"
!
whoReferencesSorted:aPackageString
"answer, which package references directly or indirectly a package define by aPackageString.
- Sort the result, so that the most direct referers are at the top"
+ Sort the result, so that the most direct referrers are at the top"
|referers orderedTuples sortedPackages|
@@ -8076,6 +8078,8 @@
self whoReferencesSorted:'stx:libwidg3'
self whoReferencesSorted:'stx:libbasic'
"
+
+ "Modified (comment): / 02-08-2017 / 18:38:03 / cg"
! !
!ProjectDefinition class methodsFor:'queries-privacy'!