Alexander Lazarević uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-laza.208.mcz==================== Summary ====================
Name: Morphic-laza.208
Author: laza
Time: 9 October 2009, 2:53 am
UUID: 535a689a-d7ae-654a-b1ab-984d3f51f560
Ancestors: Morphic-laza.207
Make sure SystemProgressMorph gets initialized during update process
=============== Diff against Morphic-laza.207 ===============
Item was changed:
----- Method: SystemProgressMorph>>recenter (in category 'private') -----
recenter
| position |
+ self class initialize.
"Put ourself in the center of the display"
self align: self fullBounds center with: Display boundingBox center.
"Check to see if labels are wider than progress bars. In that case do
a centered instead of the default left aligned layout."
position := self width > (Inset x * 2 + (self borderWidth * 2) + BarWidth)
ifTrue: [#topCenter]
ifFalse: [#leftCenter].
self cellPositioning: position!
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]
- ifTrue: [self delete]
ifFalse: [self recenter]]]!
Item was changed: