A new version of EToys was added to project The Inbox: http://source.squeak.org/inbox/EToys-kfr.494.mcz
==================== Summary ====================
Name: EToys-kfr.494 Author: kfr Time: 19 February 2023, 10:06:55.164135 am UUID: 6c582812-887d-3647-bd6b-8c072e2d7e65 Ancestors: EToys-kfr.493
Fix typo
=============== Diff against EToys-kfr.493 ===============
Item was changed: ----- Method: EventRollMorph>>makeControlsPanel (in category 'processing') ----- makeControlsPanel "One-time initialization. Upon entry, the receiver has no submorphs; upon exit, it has one, namely its controlsPanel, which contains the scale slider, the track headings, and the control buttons."
| topWrapper labelWrapper aMorph aPanel | aPanel := AlignmentMorph newColumn beTransparent. aPanel hResizing: #shrinkWrap; vResizing: #shrinkWrap.
topWrapper := AlignmentMorph newRow beTransparent. + topWrapper hResizing: #spaceFill; vResizing: #shrinkWrap. - topWrapper hResizing: #spaceFill; vResizing: #shirnkWrap. topWrapper rubberBandCells: true.
labelWrapper := AlignmentMorph newColumn beTransparent. labelWrapper addTransparentSpacerOfSize: 0@4. #('mouse' 'keyboard' 'media') translatedNoop do: [:aString | aMorph := Morph new extent: 80@ 20. aMorph hResizing: #rigid; vResizing: #rigid. aMorph beTransparent. aMorph addMorphCentered: (StringMorph contents: aString translated font: (StrikeFont familyName: 'Accujen' size: 24)). labelWrapper addMorphBack: aMorph. labelWrapper addTransparentSpacerOfSize: 0@20]. labelWrapper submorphs last delete. "that last spacer" topWrapper addMorphBack: labelWrapper. labelWrapper on: #mouseDown send: #grabMorph: to: self.
topWrapper addMorphBack: self scaleSlider.
aPanel addMorphBack: topWrapper. aPanel addMorphBack: self makeButtonsPanel. self addMorph: aPanel!
squeak-dev@lists.squeakfoundation.org