ProjectDefinition.st
changeset 25154 6760cec2fd9e
parent 25151 ef1a928b257e
child 25195 f9aaa53f74e0
--- a/ProjectDefinition.st	Wed Dec 18 19:01:09 2019 +0100
+++ b/ProjectDefinition.st	Wed Dec 18 19:04:21 2019 +0100
@@ -2974,6 +2974,7 @@
     "Created: / 23-01-2007 / 19:08:27 / cg"
 ! !
 
+
 !ProjectDefinition class methodsFor:'description - project information'!
 
 applicationAdditionalIconFileNames
@@ -3599,6 +3600,42 @@
     "Modified (comment): / 04-12-2017 / 17:40:49 / cg"
 !
 
+forEachFileNameForWhich:filter withGeneratedContentsDo:aTwoArgBlock
+    "for build-support file generation, checkin etc., use this common method which
+     enumerates all build-support fileNames with their generated contents to be built."
+
+    |pairs|
+
+    pairs := OrderedCollection new.
+    self fileNamesToGenerate keysDo:[:fileName |
+        |fileContents|
+
+        (filter value:fileName) ifTrue:[
+            fileContents := self generateFile:fileName confirmMissingClasses:false.
+            fileContents notNil ifTrue:[
+                pairs add:(Array with:fileName with:fileContents)
+            ].
+        ].
+    ].
+
+    pairs pairsDo:aTwoArgBlock
+
+    "Created: / 16-08-2006 / 18:37:52 / User"
+    "Modified: / 19-01-2015 / 16:58:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (comment): / 04-12-2017 / 17:40:49 / cg"
+!
+
+forEachFileNameForWhich:filter wothGeneratedContentsDo:aTwoArgBlock
+    "for build-support file generation, checkin etc., use this common method which
+     enumerates all build-support fileNames with their generated contents to be built."
+
+    self forEachFileNameForWhich:[:fn | true] withGeneratedContentsDo:aTwoArgBlock
+
+    "Created: / 16-08-2006 / 18:37:52 / User"
+    "Modified: / 19-01-2015 / 16:58:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (comment): / 04-12-2017 / 17:40:49 / cg"
+!
+
 generateFile:filename
     ^ self generateFile:filename confirmMissingClasses:true
 !
@@ -5092,6 +5129,7 @@
     ^ self subProjectMakeCallsUsing:'call vcmake %1 %2'.
 ! !
 
+
 !ProjectDefinition class methodsFor:'file templates'!
 
 autopackage_default_dot_apspec
@@ -8476,12 +8514,6 @@
     "Modified: / 20-09-2006 / 15:00:00 / cg"
 !
 
-isPluginDefinition
-    "for expecco"
-
-    ^ false
-!
-
 isProjectDefinition
     "concrete i.e. not abstract"