Chris Muller uploaded a new version of ReleaseBuilder to project The Trunk:
http://source.squeak.org/trunk/ReleaseBuilder-cmm.110.mcz==================== Summary ====================
Name: ReleaseBuilder-cmm.110
Author: cmm
Time: 26 January 2014, 10:21:03.554 pm
UUID: 5afb9b3e-8e39-477a-be16-fbfaeb41a183
Ancestors: ReleaseBuilder-cmm.109
- #prepareNewRelease prepares the image pointing to the release repository, not Trunk.
- By contrast, the daily non-release builds appropriately point to the #buildRepository, Trunk.
- Be explicit about clearing MC passwords for a publicly-consumed build.
=============== Diff against ReleaseBuilder-cmm.109 ===============
Item was added:
+ ----- Method: ReleaseBuilder class>>buildRepository (in category 'private') -----
+ buildRepository
+ ^ MCRepository trunk!
Item was changed:
----- Method: ReleaseBuilder class>>prepareNewBuild (in category 'scripts') -----
prepareNewBuild
+ self prepareNewBuild: self buildRepository.!
- self prepareNewBuild: self releaseRepository.!
Item was changed:
----- Method: ReleaseBuilder class>>prepareNewBuild: (in category 'scripts') -----
prepareNewBuild: anMCRepository
"ReleaseBuilderTrunk prepareNewBuild"
"Prepare everything that should be done for a new image build"
MCMcmUpdater updateMissingPackages: true.
MCMcmUpdater enableUpdatesForAllPackages.
TTCFont registerAll.
RealEstateAgent standardSize: 600 @ 400.
SystemVersion newVersion: self versionString.
SMLoaderPlus setDefaultFilters: (OrderedCollection with: #filterSafelyAvailable).
self
setDisplayExtent: 800 @ 600 ;
setPreferences ;
switchToNewRepository: anMCRepository ;
checkForDirtyPackages ;
configureDesktop.
Smalltalk cleanUp: true.
+ "Let's be explicit about clearing passwords for the publicly-consumed build."
+ "clearPasswords is not very thorough, it should be improved."
+ MCHttpRepository clearPasswords.
+ Utilities setAuthorInitials: String empty.
Environment allInstancesDo: [ : env | env purgeUndeclared ].
Undeclared removeUnreferencedKeys.
Smalltalk garbageCollect.
[ self loadWellKnownPackages "<-- 4.5 is not ready for unloaded / reloaded packages" ].
Compiler recompileAll!
Item was added:
+ ----- Method: ReleaseBuilder class>>prepareNewRelease (in category 'scripts') -----
+ prepareNewRelease
+ "This method is run at time of release to transfer the top trunk versions into my releaseRepository, and produce a release image."
+ self
+ transferCurrentPackagesAsUser: Utilities authorInitials
+ password: (UIManager default requestPassword: 'Enter password for ' , self projectUrl).
+ self prepareNewBuild: self releaseRepository!
Item was added:
+ ----- Method: ReleaseBuilder class>>projectUrl (in category 'private') -----
+ projectUrl
+ ^ (self repositoryUrl , '/', (self versionString copyWithout: $.)) asLowercase!
Item was changed:
----- Method: ReleaseBuilder class>>releaseRepository (in category 'private') -----
releaseRepository
+ ^ MCRepository location: self projectUrl!
- "At release time, change 'trunk' to 'squeak45'."
- ^ MCRepository trunk!
Locked
