[squeak-dev] The Trunk: Morphic-laza.182.mcz

Alexander Lazarević uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-laza.182.mcz

==================== Summary ====================

Name: Morphic-laza.182
Author: laza
Time: 9 September 2009, 1:22:04 am
UUID: 39d7e032-763b-a546-99cc-f9c8c90165a8
Ancestors: Morphic-laza.180

empty log message

=============== Diff against Morphic-laza.180 ===============

Item was changed:
  ----- Method: SystemProgressMorph class>>initialize (in category 'class initialization') -----
  initialize
  "SystemProgressMorph initialize; reset"
+ BarHeight := 8.
+ BarWidth := 300!
- BarHeight := 16.
- BarWidth := 200.!

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]]]!