#REFACTORING by cg draft
authorClaus Gittinger <cg@exept.de>
Fri, 12 Oct 2018 14:50:20 +0200
changeset 3602 ca4228ee4d3c
parent 3601 9afa4a73568a
child 3603 9e0abf12938f
#REFACTORING by cg class: Tools::ProjectBuilder changed: #copySupportFilesForLinkage #generateSourceFilesByFilingOut
ProjectBuilder.st
--- a/ProjectBuilder.st	Fri Oct 12 12:46:23 2018 +0200
+++ b/ProjectBuilder.st	Fri Oct 12 14:50:20 2018 +0200
@@ -651,16 +651,16 @@
     ].
     files := files asOrderedCollection.
     files add:'RELEASE'.
-    
+
     OperatingSystem isMSWINDOWSlike ifTrue:[
         (fn := projectDefinitionClass applicationIconFileNameWindows) notNil ifTrue:[
             fn asFilename suffix isEmptyOrNil ifTrue:[
                 fn := fn,'.ico'
             ].    
-            files add:('projects/smalltalk/',fn)
+            files add:(package pathRelativeToTopDirectory,'/',fn)
         ].
         (fn := projectDefinitionClass splashFileName) notNil ifTrue:[
-            files add:('projects/smalltalk/',fn,'.bmp')
+            files add:(package pathRelativeToTopDirectory,'/',fn,'.bmp')
         ].
     ].
     OperatingSystem isOSXlike ifTrue:[
@@ -668,7 +668,7 @@
             fn asFilename suffix isEmptyOrNil ifTrue:[
                 fn := fn,'.icns'
             ].    
-            files add:('projects/smalltalk/',fn)
+            files add:(package pathRelativeToTopDirectory,'/osx/',fn)
         ].
     ].
 
@@ -923,6 +923,8 @@
         do:[:eachPackageToFileout |
             |packageId packageDef packageModule packageDirectory packageTargetDir|
 
+            self activityNotification:('  source files for ',eachPackageToFileout,'...').
+
             packageId := eachPackageToFileout asPackageId.
             packageModule := packageId module.
             packageDirectory := packageId directory.