On 12/17/09 7:56 PM, "Andreas Raab" <andreas.raab at gmx.de> wrote:

> Edgar J. De Cleene wrote:
>> On 12/17/09 7:30 PM, "Andreas Raab" <andreas.raab at gmx.de> wrote:
>>> Sounds great. If the CS' are not too big, please send them to Squeak-dev
>>> as well.
>>> 
>>> Cheers,
>>>    - Andreas
>> Yes, was my intention.
>> I gz compress, think the list until the "boundary" can't be big.
>> I fileOut fron newer Trunk and do .cs for system don't complain, agree ?
> 
> You may have to use an older image - possibly as close to the boundary
> as you can make it.
> 
> Cheers,
>    - Andreas


Following private advice by Andreas:
I start with clean Squeak3.10.gamma.
Made the .cs in the order first 3.102 image load from trunk.
The point of change is

>>From update-ar.5.log
> 
> ========== Compiler-ar.68 ==========
> 
> Prerequiste changes for Closure installation.

So, the last of old .cs should be
7213AdvanceTo3dot10final.1.cs, included in the Tar and gz file.
Here I made a clean Squeak3.10final.7213.image , ready to put in ftp if all
agree.
The system is ready for hitting the updates button , follow actual Trunk
updates.

You only need fileIn first SystemProgressMorphGlue.1.cs (we could hide in
7214AdvanceTo3dot11)

I let the system go and seems load updates.

Edgar

-------------- next part --------------
A non-text attachment was scrubbed...
Name: updates.tgz
Type: application/x-gzip
Size: 55275 bytes
Desc: not available
Url : http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20091218/6072e604/updates.bin
-------------- next part --------------
'From Squeak3dot10final of 22 July 2007 [latest update: #7213] on 18 December 2009 at 10:53:34 am'!

!SystemProgressMorph methodsFor: 'labelling' stamp: 'edc 12/18/2009 10:53'!
labelAt: progressBlock put: aString
	"Change the label for the given progressBlock to aString.
	Fixme: I don't know how to map from progressBlock to label.
	For now we just use the top-level label since this works just fine."
	labels first contents: aString.! !


!SystemProgressMorph class methodsFor: 'instance creation' stamp: 'ar 6/30/2009 23:24'!
uniqueInstance
	^UniqueInstance ifNil:[super new]! !


!SystemProgressMorph reorganize!
('dropping/grabbing' slideToTrash:)
('initialization' close: initialize morphicLayerNumber setDefaultParameters updateColor:color:intensity:)
('submorphs-add/remove' dismissViaHalo)
('private' freeSlot: label:min:max: nextSlotFor:)
('labelling' labelAt:put:)
!