'From etoys3.0 of 24 February 2008 [latest update: #2141] on 12 September 2008 at 3:26 pm'!
"Change Set:		sqRelBuilderInit-yo
Date:			12 September 2008
Author:			Yoshiki Ohshima

Change the start up screen."!


!ReleaseBuilderSqueakland methodsFor: 'squeakland' stamp: 'yo 9/12/2008 15:25'!
buildInitialScreenForSqueakland
	"ReleaseBuilderSqueakland new buildInitialScreenForSqueakland"

	"pre-load QuickGuideMorph class var IndexPage"
	QuickGuideMorph new preloadIndex.

	World
		submorphsDo: [:m | m delete].
	Flaps disableGlobalFlaps: false.
	Flaps enableEToyFlaps.

	ProjectLoading loadFromImagePath: 'Tutorials'.
	ProjectLoading loadFromImagePath: 'Gallery'.
	ProjectLoading loadFromImagePath: 'EtoysActivity'.

	(World submorphs select: [:e | e isMemberOf: ProjectViewMorph]) do: [:e | e delete].
	Project current
		setThumbnail: ((Project named: SugarLauncher welcomeProjectName)
			ifNotNilDo: [:p | p thumbnail]).! !