#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Thu, 03 Aug 2017 16:45:38 +0200
changeset 22160 fbfa8355fc79
parent 22159 c8f19ee3f888
child 22161 d941d4d4246e
#DOCUMENTATION by cg class: ProjectDefinition class comment/format in: #whoReferences: #whoReferencesSorted:
ProjectDefinition.st
--- 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'!