[Pkg] The Trunk: ReleaseBuilder-fbs.90.mcz

[commits at source.squeak.org]

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

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

Name: ReleaseBuilder-fbs.90
Author: fbs
Time: 1 January 2013, 8:31:05.892 pm
UUID: 1e366eb1-9446-4499-b809-2f181c6a12cc
Ancestors: ReleaseBuilder-fbs.89

Basic ReleaseBuilder for Squeak 4.5. Note that its releaseRepository is trunk. This is so that the 4.5 alpha builds will update from the right place. At release time, this must be changed to 'squeak45'.

=============== Diff against ReleaseBuilder-fbs.89 ===============

Item was added:
+ ReleaseBuilder subclass: #ReleaseBuilderFor4dot5
+ 	instanceVariableNames: ''
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'ReleaseBuilder'!
+ 
+ !ReleaseBuilderFor4dot5 commentStamp: 'fbs 1/1/2013 20:25' prior: 0!
+ The release builder for Squeak 4.5!

Item was added:
+ ----- Method: ReleaseBuilderFor4dot5 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 added:
+ ----- Method: ReleaseBuilderFor4dot5 class>>prepareNewBuild (in category 'scripts') -----
+ prepareNewBuild
+ 	super prepareNewBuild.
+ 	MCMockPackageInfo initialize.!

Item was added:
+ ----- Method: ReleaseBuilderFor4dot5 class>>releaseRepository (in category 'private') -----
+ releaseRepository
+ 	"At release time, change 'trunk' to 'squeak45'."
+ 	^ MCHttpRepository
+ 		location: 'http://source.squeak.org/trunk'
+ 		user: 'squeak'
+ 		password: 'squeak'!

Item was added:
+ ----- Method: ReleaseBuilderFor4dot5 class>>setDisplayExtent: (in category 'private') -----
+ setDisplayExtent: extent
+ "Uncomment next line when the primitives become available in the Squeak VM."
+ "	DisplayScreen hostWindowSize: extent."
+ 	Display extent = extent ifFalse: [ Warning signal: 'Display extent not set to ', extent ]!

Item was added:
+ ----- Method: ReleaseBuilderFor4dot5 class>>setPreferences (in category 'private') -----
+ setPreferences
+ 	Preferences 
+ 		installBrightWindowColors ;
+ 		setPreference: #scrollBarsWithoutMenuButton toValue: true ;
+ 		setPreference: #swapMouseButtons toValue: true ;
+ 		setPreference: #annotationPanes toValue: true ;
+ 		setPreference: #showSplitterHandles toValue: false ;
+ 		setPreference: #showBoundsInHalo toValue: true ;
+ 		setPreference: #alternateHandlesLook toValue: false ;
+ 		setPreference: #roundedMenuCorners toValue: false ;
+ 		setPreference: #roundedWindowCorners toValue: false.
+ 	PluggableButtonMorph roundedButtonCorners: false.
+ 	FillInTheBlankMorph roundedDialogCorners: false.
+ 	Workspace shouldStyle: false.
+ 	NetNameResolver enableIPv6: true.!

Item was added:
+ ----- Method: ReleaseBuilderFor4dot5 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: ReleaseBuilderFor4dot5 class>>versionString (in category 'private') -----
+ versionString
+ 	^ 'Squeak4.5'.!