#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 19 Oct 2018 18:07:26 +0200
changeset 4372 d54a65e0fd4e
parent 4371 a5d2ba58a4af
child 4373 9d345bd900c6
#REFACTORING by cg class: ProjectChecker comment/format in: #check changed: #package:
ProjectChecker.st
--- a/ProjectChecker.st	Fri Oct 19 10:21:07 2018 +0200
+++ b/ProjectChecker.st	Fri Oct 19 18:07:26 2018 +0200
@@ -120,9 +120,16 @@
     methods := something.
 !
 
-package:packageId
+package:packageOrPackageId
     "Adds `packageId` to set of checked packages"
 
+    |packageId|
+
+    packageOrPackageId isBehavior ifTrue:[
+        packageId := packageOrPackageId package.
+    ] ifFalse:[    
+        packageId := packageOrPackageId.
+    ].
     (packages includes: packageId) ifFalse:[ 
         packages add: packageId 
     ].