The Trunk: EToys-ct.356.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: EToys-ct.356.mcz

commits-2
Marcel Taeumel uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-ct.356.mcz

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

Name: EToys-ct.356
Author: ct
Time: 20 September 2019, 7:05:06.452437 pm
UUID: 7a602971-d1cc-d94b-9efd-d99a5bf6e306
Ancestors: EToys-mt.354

FreeCell>>#help: Use #editWithLabel: instead of reinventing the wheel ...

=============== Diff against EToys-mt.354 ===============

Item was changed:
  ----- Method: FreeCell>>help (in category 'actions') -----
  help
+
+ self helpText editWithLabel: 'FreeCell Help'.!
- | window helpMorph |
- window := SystemWindow labelled: 'FreeCell Help' translated.
- window model: self.
- helpMorph := (PluggableTextMorph new editString: self helpText) lock.
- window
- addMorph: helpMorph
- frame: (0 @ 0 extent: 1 @ 1).
- window openInWorld!