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].!
Locked
