[squeak-dev] The Trunk: ReleaseBuilder-fbs.100.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Jul 4 18:15:20 UTC 2013


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

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

Name: ReleaseBuilder-fbs.100
Author: fbs
Time: 4 July 2013, 7:14:55.532 pm
UUID: 4d26e79c-81fc-df47-af42-10cbe2238e4f
Ancestors: ReleaseBuilder-fbs.99

Log more during the release process. Use stdout because running this from a command line is the most common use case.

=============== Diff against ReleaseBuilder-fbs.99 ===============

Item was changed:
  ----- Method: ReleaseBuilder class>>cleanPackages (in category 'scripts') -----
  cleanPackages
  	"Force-load the packages to ensure the image has what Trunk says it should."
  	| trunk |
  	trunk := MCRepositoryGroup default repositories detect:
   		[:repo | repo description = 'http://source.squeak.org/trunk'].
+ 	MCWorkingCopy allManagers do: [:wc |
+ 		FileStream stdout nextPutAll: ('Cleaning {1}\' withCRs format: {wc packageName}).
+ 		wc ancestors size = 1 ifFalse: [
+ 			self error: 'Package must have single parent: ', wc packageName].
- 	MCWorkingCopy allManagers
- 		do: [:wc |
- 			wc ancestors size = 1 ifFalse: [
- 				self error: 'Package must have single parent: ', wc packageName].
  		wc modified: true. "make sure actual diff is performed"
  		[(trunk versionWithInfo: wc ancestors first) load]
+ 			on: Warning do: [:w | w resume]].!
- 			on: Warning do: [:w | w resume]]
- 		displayingProgress: 'Cleaning packages'.!

Item was changed:
  ----- Method: ReleaseBuilder class>>loadWellKnownPackages (in category 'private') -----
  loadWellKnownPackages
  	"Load into the release image those packages that have been stripped from Trunk, but still deemed necessary for a release artifact."
  	#('311Deprecated'
  	'39Deprecated'
  	'45Deprecated'
  	'Nebraska'
  	'SmallLand-ColorTheme'
  	'ST80'
  	'ST80Tools'
  	'Universes'
  	'XML-Parser') do: [:pkgName |
+ 		FileStream stdout nextPutAll: ('Loading {1}\' withCRs format: {pkgName}).
  		Installer squeak
  			project: 'trunk';
  			install: pkgName].!



More information about the Squeak-dev mailing list