Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.909.mcz==================== Summary ====================
Name: System-mt.909
Author: mt
Time: 24 August 2016, 1:46:49.298718 pm
UUID: 45340af2-d996-df46-bb18-7ccfdd38854b
Ancestors: System-mt.908
For MVC, add simple mappings for important settings in UI themes (and all which derive from the Squeak standard theme).
=============== Diff against System-mt.908 ===============
Item was added:
+ ----- Method: SqueakTheme class>>addMVC: (in category 'instance creation') -----
+ addMVC: theme
+ "
+ self create apply.
+ "
+ theme
+ derive: #color for: #ListView from: #PluggableListMorph;
+ derive: #borderColor for: #ListView from: #PluggableListMorph at: #textColor;
+
+ derive: #color for: #StringHolderView from: #PluggableTextMorph;
+ derive: #borderColor for: #StringHolderView from: #PluggableTextMorph at: #textColor;
+
+ derive: #color for: #PluggableButtonView from: #PluggableButtonMorph;
+ derive: #borderColor for: #PluggableButtonView from: #PluggableButtonMorph at: #textColor;
+ derive: #font for: #PluggableButtonView from: #PluggableButtonMorph;
+
+ derive: #color for: #PopUpMenu from: #MenuMorph;
+ derive: #borderColor for: #PopUpMenu from: #MenuMorph;
+ derive: #textColor for: #PopUpMenu from: #MenuItemMorph;
+ derive: #lineColor for: #PopUpMenu from: #MenuMorph at: #borderColor;
+
+ set: #borderColorModifier for: #StandardSystemView to: [ [:c | c adjustBrightness: -0.5] ].!
Item was changed:
----- Method: SqueakTheme class>>create (in category 'instance creation') -----
create
"This is the default theme for Squeak.
self create apply. "
^ (self named: 'Squeak') in: [:theme |
"General morph stuff."
theme
set: #keyboardFocusColor for: #Morph to: (TranslucentColor r: 0.3 g: 0.5 b: 0.5 alpha: 0.5);
set: #keyboardFocusWidth for: #Morph to: 3;
set: #softShadowColor for: #Morph to: (Color black alpha: 0.01);
set: #softShadowOffset for: #Morph to: (10@8 corner: 10@12);
set: #hardShadowColor for: #Morph to: (Color black alpha: 0.5);
set: #hardShadowOffset for: #Morph to: 1@1.
theme set: #background for: #MorphicProject to: self linenblue.
self
addFonts: theme;
addWindowColors: theme;
addSyntaxHighlighting: theme;
addMenusAndDockingBars: theme;
addDialogs: theme;
addButtons: theme;
addScrollables: theme;
+ addToolColors: theme;
+ addMVC: theme.
- addToolColors: theme.
theme]!