The Trunk: System-mt.1143.mcz

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

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

Name: System-mt.1143
Author: mt
Time: 5 March 2020, 1:19:48.088611 pm
UUID: 2ff047e8-54ee-1d4d-97ab-cac7594ad307
Ancestors: System-mt.1142

More deprecations regarding colors. Also removes a deprecated message send.

=============== Diff against System-mt.1142 ===============

Item was changed:
  ----- Method: Preferences class>>addModelItemsToWindowMenu: (in category 'support - misc') -----
  addModelItemsToWindowMenu: aMenu
  aMenu addLine.
+ aMenu add: 'restore default preference settings' target: self action: #chooseInitialSettings.!
- aMenu add: 'restore default preference settings' target: self action: #chooseInitialSettings.
- aMenu add: 'restore default text highlighting' target: self action: #initializeTextHighlightingParameters!

Item was removed:
- ----- Method: Preferences class>>chooseInsertionPointColor (in category 'prefs - text') -----
- chooseInsertionPointColor
- "Let the user indicate what color he wishes to have used for insertion points in text"
-
- ColorPickerMorph new
- choseModalityFromPreference;
- sourceHand: self currentHand;
- target: self;
- selector: #insertionPointColor:;
- originalColor: self insertionPointColor;
- putUpFor: self currentHand near: self currentHand cursorBounds!

Item was removed:
- ----- Method: Preferences class>>chooseKeyboardFocusColor (in category 'prefs - text') -----
- chooseKeyboardFocusColor
- "Let the user indicate what color he wishes to have used for keyboard-focus feedback"
-
- ColorPickerMorph new
- choseModalityFromPreference;
- sourceHand: self currentHand;
- target: self;
- selector: #keyboardFocusColor:;
- originalColor: self keyboardFocusColor;
- putUpFor: self currentHand near: self currentHand cursorBounds!

Item was removed:
- ----- Method: Preferences class>>chooseTextHighlightColor (in category 'prefs - text') -----
- chooseTextHighlightColor
- "Let the user choose the text-highlight color"
-
- ColorPickerMorph new
- choseModalityFromPreference;
- sourceHand: self currentHand;
- target: self;
- selector: #textHighlightColor:;
- originalColor: self textHighlightColor;
- putUpFor: self currentHand near: self currentHand cursorBounds!

Item was changed:
  ----- Method: Preferences class>>initializeParameters (in category 'parameters') -----
  initializeParameters
  "Preferences initializeParameters"
  Parameters := IdentityDictionary new.
+ Parameters at: #maxBalloonHelpLineLength put: 28.!
- Parameters at: #maxBalloonHelpLineLength put: 28.
- self initializeTextHighlightingParameters!

Item was removed:
- ----- Method: Preferences class>>initializeTextHighlightingParameters (in category 'prefs - text') -----
- initializeTextHighlightingParameters
- "Preferences initializeTextHighlightingParameters"
-
- self
- insertionPointColor: (TranslucentColor r: 0.0 g: 0.0 b: 0.8 alpha: 0.8);
- textHighlightColor: (TranslucentColor r: 0.0 g: 0.0 b: 0.8 alpha: 0.2)!

Item was removed:
- ----- Method: Preferences class>>insertionPointColor (in category 'prefs - text') -----
- insertionPointColor
- ^ Parameters at: #insertionPointColor!

Item was removed:
- ----- Method: Preferences class>>insertionPointColor: (in category 'prefs - text') -----
- insertionPointColor: aColor
- Parameters at: #insertionPointColor put: aColor!

Item was removed:
- ----- Method: Preferences class>>keyboardFocusColor (in category 'prefs - text') -----
- keyboardFocusColor
- "Answer the keyboard focus color, initializing it if necessary"
-
- ^ Parameters at: #keyboardFocusColor ifAbsentPut: [Color lightGray]
-
- "
- Parameters removeKey: #keyboardFocusColor.
- Preferences keyboardFocusColor
- "!

Item was removed:
- ----- Method: Preferences class>>keyboardFocusColor: (in category 'prefs - text') -----
- keyboardFocusColor: aColor
- "Set the keyboard focus color"
-
- Parameters at: #keyboardFocusColor put: aColor!

Item was removed:
- ----- Method: Preferences class>>textHighlightColor (in category 'prefs - text') -----
- textHighlightColor
- ^ Parameters at: #textHighlightColor!

Item was removed:
- ----- Method: Preferences class>>textHighlightColor: (in category 'prefs - text') -----
- textHighlightColor: aColor
- Parameters at: #textHighlightColor put: aColor!

Item was removed:
- ----- Method: Project>>toggleFullScreen (in category 'menu messages') -----
- toggleFullScreen
- "Toggle between full screen and windowed mode."
- self lastScreenModeSelected
- ifTrue: [ self fullScreenOff ]
- ifFalse: [ self fullScreenOn ]!