[squeak-dev] The Trunk: 51Deprecated-mt.47.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Aug 24 07:19:01 UTC 2016


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

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

Name: 51Deprecated-mt.47
Author: mt
Time: 24 August 2016, 9:18:52.102086 am
UUID: 91c0a16a-f16a-784a-9ea5-a21976599744
Ancestors: 51Deprecated-mt.46

Reduce use of deprecated API.

=============== Diff against 51Deprecated-mt.46 ===============

Item was changed:
  ----- Method: MenuLineMorph>>drawOn: (in category 'drawing') -----
  drawOn: aCanvas 
+ 
+ 	aCanvas
+ 		fillRectangle: ((bounds topLeft corner: bounds bottomRight) insetBy: (0 at 0 corner: 0@ 1))
+ 		color: Color gray.!
- 	| baseColor |
- 	baseColor := Preferences menuColorFromWorld
- 				ifTrue: [owner color twiceDarker]
- 				ifFalse: [Preferences menuAppearance3d
- 						ifTrue: [owner color]
- 						ifFalse: [MenuMorph menuLineColor]].
- 	Preferences menuAppearance3d
- 		ifTrue: [
- 			aCanvas
- 				fillRectangle: (bounds topLeft corner: bounds rightCenter)
- 				color: baseColor twiceDarker.
- 			
- 			aCanvas
- 				fillRectangle: (bounds leftCenter corner: bounds bottomRight)
- 				color: baseColor twiceLighter]
- 		ifFalse: [
- 			aCanvas
- 				fillRectangle: ((bounds topLeft corner: bounds bottomRight) insetBy: (0 at 0 corner: 0@ 1))
- 				color: baseColor]!



More information about the Squeak-dev mailing list