Alexander Lazarević uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-laza.181.mcz==================== Summary ====================
Name: Morphic-laza.181
Author: laza
Time: 9 September 2009, 1:16:44 am
UUID: c5ec815f-0fab-9e42-8687-66355d185b32
Ancestors: Morphic-laza.180
empty log message
=============== Diff against Morphic-laza.180 ===============
Item was changed:
----- Method: SystemProgressMorph>>labelAt:put: (in category 'labelling') -----
labelAt: progressBlock put: aString
"Change the label for the given progressBlock to aString."
+ progressBlock value: aString!
- "progressBlock value: aString"!
Item was changed:
----- Method: SystemProgressMorph>>freeSlot: (in category 'private') -----
freeSlot: number
number > 0 ifTrue: [
lock critical: [
(bars at: number) delete.
(labels at: number) delete.
activeSlots := activeSlots - 1.
activeSlots = 0
+ ifTrue: [self delete. self class initialize; reset]
- ifTrue: [self delete]
ifFalse: [self recenter]]]!