#UI_ENHANCEMENT by cg
class: Tools::ProjectBuilder
added: #determineBuildDirectory
changed:
#buildDirectory
#buildWithOutputTo:errorTo:
--- a/ProjectBuilder.st Wed Oct 05 17:35:22 2016 +0200
+++ b/ProjectBuilder.st Wed Oct 05 19:02:48 2016 +0200
@@ -133,6 +133,9 @@
!ProjectBuilder methodsFor:'accessing'!
buildDirectory
+ buildDirectory isNil ifTrue:[
+ self determineBuildDirectory
+ ].
^ buildDirectory
!
@@ -288,12 +291,8 @@
directory := package directory.
buildDirectory isNil ifTrue:[
- buildDirectory := PreviousBuildDirectory ifNil:[ UserPreferences current buildDirectory ].
- buildDirectory isNil ifTrue:[
- buildDirectory := Filename tempDirectory construct:'stx_build'.
- ].
+ self determineBuildDirectory.
].
- buildDirectory := buildDirectory asFilename.
"/ self validateBuildDirectoryIsPresent.
@@ -758,6 +757,16 @@
"Modified: / 15-08-2011 / 14:58:46 / cg"
!
+determineBuildDirectory
+ buildDirectory isNil ifTrue:[
+ buildDirectory := PreviousBuildDirectory ifNil:[ UserPreferences current buildDirectory ].
+ buildDirectory isNil ifTrue:[
+ buildDirectory := Filename tempDirectory construct:'stx_build'.
+ ].
+ ].
+ buildDirectory := buildDirectory asFilename.
+!
+
generateBuildSupportFilesByFilingOutIn:packageTargetDir forDefinitionClass:projectDefinitionClass
|fullPathName|