The Trunk: System-mt.1079.mcz

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

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

Name: System-mt.1079
Author: mt
Time: 4 August 2019, 4:21:40.075226 pm
UUID: ccfbfb85-c9a3-fd43-9800-3b622ba6d336
Ancestors: System-mt.1078

Prepare all UI themes for indicating deprecated messages in tools.

=============== Diff against System-mt.1078 ===============

Item was changed:
  ----- Method: CommunityTheme class>>addDarkToolColors: (in category 'instance creation') -----
  addDarkToolColors: theme
  "Tool-specific colors."
 
  theme
  set: #failureColor for: #TestRunner to: self dbYellow;
  set: #errorColor for: #TestRunner to: self dbRed;
  set: #passColor for: #TestRunner to: self dbGreen.
 
  "Browser."
+ theme
+ set: #noClassCommentColor for: #Browser to: self dbRed;
+ set: #deprecatedMessageAttributes for: #CodeHolder to: { TextEmphasis struckOut. TextColor color: self dbGray }.!
- theme set: #noClassCommentColor for: #Browser to: self dbRed.!

Item was changed:
  ----- Method: MonokaiTheme class>>addDarkToolColors: (in category 'instance creation') -----
  addDarkToolColors: theme
  "Tool-specific colors."
 
  theme
  set: #failureColor for: #TestRunner to: self yellow;
  set: #errorColor for: #TestRunner to: self red;
  set: #passColor for: #TestRunner to: self green;
 
  set: #failureTextColor for: #TestRunner to: self backgroundColor;
  set: #errorTextColor for: #TestRunner to: self backgroundColor;
  set: #passTextColor for: #TestRunner to: self backgroundColor.
 
  theme
  set: #ignoredOperationAttributes for: #MCOperationsBrowser to: {TextColor color: self grayLight}.
 
  "Browser."
+ theme
+ set: #noClassCommentColor for: #Browser to: self red;
+ set: #deprecatedMessageAttributes for: #CodeHolder to: { TextEmphasis struckOut. TextColor color: self grayLight }.!
- theme set: #noClassCommentColor for: #Browser to: self red.!

Item was changed:
  ----- Method: SolarizedTheme class>>addDarkToolColors: (in category 'instance creation') -----
  addDarkToolColors: theme
  "Tool-specific colors."
 
  theme
  set: #failureColor for: #TestRunner to: self yellow;
  set: #errorColor for: #TestRunner to: self red;
  set: #passColor for: #TestRunner to: self green;
 
  set: #failureTextColor for: #TestRunner to: self darkBackground;
  set: #errorTextColor for: #TestRunner to: self darkBackground;
  set: #passTextColor for: #TestRunner to: self darkBackground.
 
  theme
  set: #ignoredOperationAttributes for: #MCOperationsBrowser to: {TextColor color: self darkContentSecondary}.
 
  "Browser."
+ theme
+ set: #noClassCommentColor for: #Browser to: self red;
+ set: #deprecatedMessageAttributes for: #CodeHolder to: { TextEmphasis struckOut. TextColor color: self darkContentSecondary }.!
- theme set: #noClassCommentColor for: #Browser to: self red.!

Item was changed:
  ----- Method: SolarizedTheme class>>addLightToolColors: (in category 'instance creation') -----
  addLightToolColors: theme
  "Tool-specific colors."
 
  theme
  set: #failureColor for: #TestRunner to: self yellow;
  set: #errorColor for: #TestRunner to: self red;
  set: #passColor for: #TestRunner to: self green;
 
  set: #failureTextColor for: #TestRunner to: self lightBackground;
  set: #errorTextColor for: #TestRunner to: self lightBackground;
  set: #passTextColor for: #TestRunner to: self lightBackground.
 
  theme
  set: #ignoredOperationAttributes for: #MCOperationsBrowser to: {TextColor color: self lightContentSecondary}.
 
  "Browser."
+ theme
+ set: #noClassCommentColor for: #Browser to: self red;
+ set: #deprecatedMessageAttributes for: #CodeHolder to: { TextEmphasis struckOut. TextColor color: self lightContentSecondary }.!
- theme set: #noClassCommentColor for: #Browser to: self red.!

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].
 
+ "Code-browsing tools."
+ theme
+ set: #noClassCommentColor for: #Browser to: Color red;
+ set: #deprecatedMessageAttributes for: #CodeHolder to: { TextEmphasis struckOut. TextColor gray }.
- "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.!

Item was changed:
  ----- Method: TrimTheme class>>addToolColors: (in category 'instance creation') -----
  addToolColors: theme
  "Tool-specific colors."
 
  "SUnit's TestRunner."
  theme
  set: #failureColor for: #TestRunner to: self yellow;
  set: #errorColor for: #TestRunner to: self red;
  set: #passColor for: #TestRunner to: self green.
 
  "Monticello Tools."
  theme
  set: #revertedOperationAttributes for: #MCOperationsBrowser to: {TextEmphasis struckOut};
  set: #ignoredOperationAttributes for: #MCOperationsBrowser to: {TextColor color: self gray128}.
 
  "Browser."
+ theme
+ set: #noClassCommentColor for: #Browser to: self red;
+ set: #deprecatedMessageAttributes for: #CodeHolder to: { TextEmphasis struckOut. TextColor color: self gray128 }.!
- theme set: #noClassCommentColor for: #Browser to: self red.!