The Trunk: System-mt.857.mcz

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

The Trunk: System-mt.857.mcz

commits-2
Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.857.mcz

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

Name: System-mt.857
Author: mt
Time: 1 August 2016, 5:13:08.765106 pm
UUID: 0297521f-ec7e-7e4e-88c1-725a49f25bd2
Ancestors: System-mt.856

Theme the three-phase button, too.

=============== Diff against System-mt.856 ===============

Item was changed:
  ----- Method: SqueakTheme class>>addButtons: (in category 'instance creation') -----
  addButtons: theme
 
  theme
  set: #borderColor for: #PluggableButtonMorph to: Color gray;
  set: #borderWidth for: #PluggableButtonMorph to: 1;
  set: #borderStyle for: #PluggableButtonMorph to: BorderStyle default;
  set: #color for: #PluggableButtonMorph to: [Color gray: 0.91];
 
  set: #font for: #PluggableButtonMorph to: [Preferences standardButtonFont];
  set: #textColor for: #PluggableButtonMorph to: Color black;
 
  set: #selectionModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: -0.2] ];
  set: #hoverModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: -0.1] ];
  set: #feedbackModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: -0.3] ].
 
  "And the plus-version."
  theme
  set: #disabledColor for: #PluggableButtonMorphPlus to: Color transparent;
  set: #disabledTextColor for: #PluggableButtonMorphPlus to: (Color gray: 0.6).
+
+ "And the three-phase button."
+ theme
+ derive: #color for: #ThreePhaseButtonMorph from: #PluggableButtonMorph at: #textColor;
+ derive: #font for: #ThreePhaseButtonMorph from: #PluggableButtonMorph;
+ derive: #textColor for: #ThreePhaseButtonMorph from: #PluggableButtonMorph.!
- !