[Pkg] The Trunk: ReleaseBuilder-cmm.107.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Jan 18 23:20:49 UTC 2014
Chris Muller uploaded a new version of ReleaseBuilder to project The Trunk:
http://source.squeak.org/trunk/ReleaseBuilder-cmm.107.mcz
==================== Summary ====================
Name: ReleaseBuilder-cmm.107
Author: cmm
Time: 18 January 2014, 5:20:36.277 pm
UUID: 6b317f48-4ad8-4fcf-a8d6-299a8166b54b
Ancestors: ReleaseBuilder-cwp.106
prepareNewBuild to clean desktop, ensure clean packages and up-to-date docking bar properties.
=============== Diff against ReleaseBuilder-cwp.106 ===============
Item was removed:
- ----- Method: ReleaseBuilder class>>cleanPackages (in category 'scripts') -----
- cleanPackages
- "Force-load the packages to ensure the image has what Trunk says it should."
- 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].
- wc modified: true. "make sure actual diff is performed"
- [(MCRepository trunk versionWithInfo: wc ancestors first) load]
- on: Warning do: [:w | w resume]].!
Item was added:
+ ----- Method: ReleaseBuilder class>>configureDesktop (in category 'private') -----
+ configureDesktop
+ self deleteAllWindows.
+ MorphicProject initialize.
+ "Replace docking bar instance in case its code has changed."
+ Project current removeMainDockingBar.
+ TheWorldMainDockingBar updateInstances!
Item was added:
+ ----- Method: ReleaseBuilder class>>deleteAllWindows (in category 'private') -----
+ deleteAllWindows
+ (SystemWindow
+ windowsIn: ActiveWorld
+ satisfying:
+ [ : window | true ]) do:
+ [ : window | [ window makeClosable; delete ]
+ on: ProvideAnswerNotification
+ do: [ : noti | noti resume: true ] ]!
Item was removed:
- ----- Method: ReleaseBuilder class>>openWelcomeWorkspaces (in category 'private') -----
- openWelcomeWorkspaces
- TheWorldMainDockingBar instance
- showWelcomeText: #squeakUserInterface
- label: 'Squeak User Interface'
- in: (40 @ 40 extent: 500 @ 300).
- TheWorldMainDockingBar instance
- showWelcomeText: #workingWithSqueak
- label: 'Working With Squeak'
- in: (80 @ 80 extent: 500 @ 300).
- TheWorldMainDockingBar instance
- showWelcomeText: #licenseInformation
- label: 'License Information'
- in: (120 @ 120 extent: 500 @ 300).
- TheWorldMainDockingBar instance
- showWelcomeText: #welcomeFutureDirections
- label: 'Future Directions'
- in: (160 @ 160 extent: 500 @ 300).
- TheWorldMainDockingBar instance
- showWelcomeText: #welcomeToSqueak
- label: 'Welcome to Squeak 4.5'
- in: (200 @ 200 extent: 500 @ 300)!
Item was changed:
----- Method: ReleaseBuilder class>>prepareNewBuild: (in category 'scripts') -----
+ prepareNewBuild: anMCRepository
- prepareNewBuild: anMCRepository
"ReleaseBuilderTrunk prepareNewBuild"
"Prepare everything that should be done for a new image build"
MCMcmUpdater updateMissingPackages: true.
MCMcmUpdater enableUpdatesForAllPackages.
- Workspace allInstances do: [ : each | each topView delete].
- MorphicProject initialize.
TTCFont registerAll.
+ RealEstateAgent standardSize: 600 @ 400.
- RealEstateAgent standardSize: 600 at 400.
SystemVersion newVersion: self versionString.
+ SMLoaderPlus setDefaultFilters: (OrderedCollection with: #filterSafelyAvailable).
+ self
+ setDisplayExtent: 800 @ 600 ;
+ setPreferences ;
+ switchToNewRepository: anMCRepository ;
+ configureDesktop ;
+ verifyPackagesClean.
- SMLoaderPlus
- setDefaultFilters: (OrderedCollection with: #filterSafelyAvailable).
- self setDisplayExtent: 800 @ 600;
- setPreferences;
- switchToNewRepository: anMCRepository;
- openWelcomeWorkspaces.
- self cleanPackages.
Smalltalk cleanUp: true.
+ Environment allInstancesDo: [ : env | env purgeUndeclared ].
+ Undeclared removeUnreferencedKeys.
- Environment allInstancesDo:
- [:env | env purgeUndeclared].
Smalltalk garbageCollect.
+ [ self loadWellKnownPackages "<-- 4.5 is not ready for unloaded / reloaded packages" ].
+ Compiler recompileAll!
- self loadWellKnownPackages.
- Compiler recompileAll.!
Item was added:
+ ----- Method: ReleaseBuilder class>>verifyPackagesClean (in category 'scripts') -----
+ verifyPackagesClean
+ MCWorkingCopy allManagers do:
+ [ : wc | wc ancestors size = 1 ifFalse: [ self error: 'Package should have single ancestor for release image.' , wc packageName ].
+ wc modified ifTrue: [ self error: 'Packages should be clean for release image.' ] ]!
More information about the Packages
mailing list