Frank Shearar uploaded a new version of ReleaseBuilder to project The Trunk:
http://source.squeak.org/trunk/ReleaseBuilder-fbs.103.mcz

==================== Summary ====================

Name: ReleaseBuilder-fbs.103
Author: fbs
Time: 1 November 2013, 9:31:11.134 am
UUID: b37da1c1-cfc0-8c45-a77c-c8a5ca288d50
Ancestors: ReleaseBuilder-cmm.102

Prior to this commit, the release manager needed to edit prepareNewBuild to put in the correct upstream repo.

Now it's hardcoded, but with a means for other tasks (like CI) to produce interim artifacts (release candidate images, say) to produce released images.

=============== Diff against ReleaseBuilder-cmm.102 ===============

Item was changed:
  ----- Method: ReleaseBuilder class>>prepareNewBuild (in category 'scripts') -----
  prepareNewBuild
+ 	self prepareNewBuild: self releaseRepository.!
- 	"ReleaseBuilderTrunk prepareNewBuild"
- 	"Prepare everything that should be done for a new image build"
- 	TTCFont registerAll.
- 	RealEstateAgent standardSize: 600 at 400.
- 	SystemVersion newVersion: self versionString.
- 	SMLoaderPlus
- 		setDefaultFilters: (OrderedCollection with: #filterSafelyAvailable).
- 	self setDisplayExtent: 800 @ 600;
- 		 setPreferences;
- 		 switchToNewRepository;
- 		 openWelcomeWorkspaces.
- 	self cleanPackages.
- 	Smalltalk cleanUp: true.
- 	Undeclared removeUnreferencedKeys.
- 	Smalltalk garbageCollect.
- 	self loadWellKnownPackages.
- 	Compiler recompileAll.!

Item was added:
+ ----- Method: ReleaseBuilder class>>prepareNewBuild: (in category 'scripts') -----
+ prepareNewBuild: anMCRepository
+ 	"ReleaseBuilderTrunk prepareNewBuild"
+ 	"Prepare everything that should be done for a new image build"
+ 	TTCFont registerAll.
+ 	RealEstateAgent standardSize: 600 at 400.
+ 	SystemVersion newVersion: self versionString.
+ 	SMLoaderPlus
+ 		setDefaultFilters: (OrderedCollection with: #filterSafelyAvailable).
+ 	self setDisplayExtent: 800 @ 600;
+ 		 setPreferences;
+ 		 switchToNewRepository: anMCRepository;
+ 		 openWelcomeWorkspaces.
+ 	self cleanPackages.
+ 	Smalltalk cleanUp: true.
+ 	Undeclared removeUnreferencedKeys.
+ 	Smalltalk garbageCollect.
+ 	self loadWellKnownPackages.
+ 	Compiler recompileAll.!

Item was removed:
- ----- Method: ReleaseBuilder class>>switchToNewRepository (in category 'private') -----
- switchToNewRepository
- 	| old44Repository |
- 	MCMcmUpdater defaultUpdateURL: self releaseRepository description.
- 	old44Repository := MCRepositoryGroup default repositories
- 				detect: [:each | each description includesSubString: 'squeak44'] ifNone: [nil].
- 	old44Repository
- 		ifNotNil: [MCRepositoryGroup default removeRepository: old44Repository].
- 	MCRepositoryGroup default addRepository: self releaseRepository!

Item was added:
+ ----- Method: ReleaseBuilder class>>switchToNewRepository: (in category 'private') -----
+ switchToNewRepository: anMCRepository
+ 	| old44Repository |
+ 	MCMcmUpdater defaultUpdateURL: anMCRepository description.
+ 	old44Repository := MCRepositoryGroup default repositories
+ 				detect: [:each | each description includesSubString: 'squeak44'] ifNone: [nil].
+ 	old44Repository
+ 		ifNotNil: [MCRepositoryGroup default removeRepository: old44Repository].
+ 	MCRepositoryGroup default addRepository: anMCRepository.!