'From etoys4.0 of 9 October 2008 [latest update: #2349] on 23 April 2010 at 3:50:05 am'!
"Change Set:		newUpdateStream-bf
Date:			23 April 2010
Author:			Bert Freudenberg

Switch to new updateStream at http://etoys.squeak.org/updates/"!


!ReleaseBuilderSqueakland methodsFor: 'squeakland' stamp: 'bf 4/23/2010 03:48'!
setupUpdateStreamForSqueakland

	| base url d |
	base := 'etoys.squeak.org/'.
	url := 'http://', base, 'updates'.
	d := DAVMultiUserServerDirectory on: url.
	d altUrl: url.
	d moniker: 'Etoys Updates'.
	d groupName: 'etoys'.
	Utilities classPool at: #UpdateUrlLists put: nil.
	ServerDirectory inImageServers keysDo: [:k | ServerDirectory inImageServers removeKey: k].
	ServerDirectory inImageServers at: d moniker put: d.
	Utilities updateUrlLists add: {d moniker. {base}}.

	"SystemVersion newVersion: 'etoys4.1'."
	"SystemVersion current resetHighestUpdate."
! !

"Postscript:"
ReleaseBuilderSqueakland new
	setupUpdateStreamForSqueakland;
	setupServerDirectoryForSqueakland!