The Trunk: System-pre.1038.mcz

Patrick Rein uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-pre.1038.mcz

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

Name: System-pre.1038
Author: pre
Time: 10 July 2018, 2:26:49.603227 pm
UUID: 53fb8e38-d4f4-0f4c-b269-68ca4ffbc2c0
Ancestors: System-eem.1037

Adds theme properties for the objects tool

=============== Diff against System-eem.1037 ===============

Item was changed:
  ----- Method: SqueakTheme class>>addToolColors: (in category 'instance creation') -----
  addToolColors: theme
  "Tool-specific colors."
 
  "SUnit's TestRunner."
  theme
  set: #failureColor for: #TestRunner to: Color yellow;
  set: #errorColor for: #TestRunner to: Color red;
  set: #passColor for: #TestRunner to: Color green;
 
  derive: #failureTextColor for: #TestRunner from: #PluggableTextMorph at: #textColor;
  derive: #errorTextColor for: #TestRunner from: #PluggableTextMorph at: #textColor;
  derive: #passTextColor for: #TestRunner from: #PluggableTextMorph at: #textColor.
 
  "Monticello Tools."
  theme
  set: #revertedOperationAttributes for: #MCOperationsBrowser to: {TextEmphasis struckOut};
  set: #ignoredOperationAttributes for: #MCOperationsBrowser to: {TextColor color: Color gray}.
  "set: #rejectedOperationAttributes for: #MCOperationsBrowser to: {TextEmphasis struckOut};
  set: #acceptedOperationAttributes for: #MCOperationsBrowser to: {TextEmphasis underlined};
  set: #conflictingOperationAttributes for: #MCOperationsBrowser to: {TextEmphasis bold}."
 
  "Halos."
  theme
  derive: #borderColor for: #HaloMorph from: #MenuItemMorph at: #selectionColor do: [:c | c alpha: 0.8];
  derive: #borderColor for: #SelectionMorph from: #MenuItemMorph at: #selectionColor do: [:c | c twiceDarker alpha: 0.75];
  derive: #color for: #SelectionMorph from: #MenuItemMorph at: #selectionColor do: [:c | c alpha: 0.08].
 
  "Browser."
  theme set: #noClassCommentColor for: #Browser to: Color red.
 
  "Objects Tool."
  theme
  derive: #borderWidth for: #ObjectsTool from: #MenuMorph;
  derive: #borderColor for: #ObjectsTool from: #MenuMorph;
  derive: #borderStyle for: #ObjectsTool from: #MenuMorph;
+ derive: #color for: #ObjectsTool from: #MenuMorph;
+ derive: #textColor for: #ObjectsTool from: #MenuItemMorph;
+ derive: #selectionTextColor for: #ObjectsTool from: #MenuItemMorph.!
- derive: #color for: #ObjectsTool from: #MenuMorph.!