[squeak-dev] The Trunk: ToolBuilder-Morphic-mt.228.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jul 3 17:16:56 UTC 2019


Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.228.mcz

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

Name: ToolBuilder-Morphic-mt.228
Author: mt
Time: 3 July 2019, 7:16:56.953711 pm
UUID: ca0ee8a0-9619-8643-a771-e1abc09f5173
Ancestors: ToolBuilder-Morphic-pre.227

Makes pluggable check-box morph compatible with UI themes.

=============== Diff against ToolBuilder-Morphic-pre.227 ===============

Item was added:
+ ----- Method: PluggableCheckBoxMorph>>initialize (in category 'initialization') -----
+ initialize
+ 
+ 	super initialize.
+ 	self color: Color transparent.!

Item was changed:
  ----- Method: PluggableCheckBoxMorph>>installButton (in category 'installing') -----
  installButton
  
+ 	| aButton |
- 	| aButton aLabel |
  	aButton := UpdatingThreePhaseButtonMorph checkBox
  		target: self model;
  		actionSelector: self actionSelector;
  		getSelector: self valueSelector;
+ 		label: self label;
  		yourself.
+ 
- 	aLabel := (StringMorph contents: self label translated
- 				font: (StrikeFont familyName: TextStyle defaultFont familyName
- 							pointSize: TextStyle defaultFont pointSize - 1)).
  	self addMorph: (self horizontalPanel
  		addMorphBack: aButton;
+ 		
- 		addMorphBack: aLabel;
  		yourself).!



More information about the Squeak-dev mailing list