The Trunk: PreferenceBrowser-kfr.58.mcz

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

The Trunk: PreferenceBrowser-kfr.58.mcz

commits-2
Karl Ramberg uploaded a new version of PreferenceBrowser to project The Trunk:
http://source.squeak.org/trunk/PreferenceBrowser-kfr.58.mcz

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

Name: PreferenceBrowser-kfr.58
Author: kfr
Time: 3 January 2016, 6:13:14.444 pm
UUID: e5f58d19-2c9a-4e05-b58d-0b7ade0be73f
Ancestors: PreferenceBrowser-kfr.57

Fix for updating color when using the NewColorPickerMorph

=============== Diff against PreferenceBrowser-kfr.57 ===============

Item was changed:
  ----- Method: PBColorPreferenceView>>changeColor: (in category 'user interface') -----
  changeColor: aButton
+ NewColorPickerMorph useIt
+ ifTrue:
+ [ (NewColorPickerMorph
+ on: self
+ originalColor: aButton color
+ setColorSelector: #setButtonColor:) openNear: aButton fullBoundsInWorld ]
+ ifFalse:
+ [ ColorPickerMorph new
+ choseModalityFromPreference ;
+ sourceHand: aButton activeHand ;
+ target: self ;
+ selector: #setButtonColor: ;
+ originalColor: aButton color ;
+
+ putUpFor: aButton
+ near: aButton fullBoundsInWorld ] !
- aButton changeColor.
- self preference preferenceValue: aButton fillStyle.
- button label: self preference preferenceValue asString.
- self adjustLabelColor !

Item was added:
+ ----- Method: PBColorPreferenceView>>setButtonColor: (in category 'user interface') -----
+ setButtonColor: aColor
+ button color: aColor.
+ self preference preferenceValue: aColor.
+ button label: self preference preferenceValue asString.
+ self adjustLabelColor
+ !