[squeak-dev] The Trunk: 60Deprecated-mt.111.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Apr 20 07:59:24 UTC 2022


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

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

Name: 60Deprecated-mt.111
Author: mt
Time: 20 April 2022, 9:59:23.142938 am
UUID: 9cbedf34-d3bc-7847-89e2-dff15bf5a934
Ancestors: 60Deprecated-mt.110

Clean up MC code-update issues. Step 2 of 2.

=============== Diff against 60Deprecated-mt.110 ===============

Item was removed:
- ----- Method: TTFileDescription class>>offerNonPortableFonts (in category 'user interaction') -----
- offerNonPortableFonts
- 	"Should native fonts be offered when displaying font menus?"
- 	<preference: 'Offer Native Fonts'
- 		category: 'Morphic'
- 		description: 'When true, an additional menu is offered for choosing non-portable fonts'
- 		type: #Boolean>
- 	^OfferNonPortableFonts ifNil:[true]!

Item was removed:
- ----- Method: TTFileDescription class>>offerNonPortableFonts: (in category 'user interaction') -----
- offerNonPortableFonts: aBool
- 	"Should native fonts be offered when displaying font menus?"
- 	OfferNonPortableFonts := aBool.!

Item was removed:
- ----- Method: TTFileDescription>>extraGap (in category 'accessing') -----
- extraGap
- 	"See commenetary in TTFontDescription"
- 	
- 	^ extraGap ifNil: [extraGap := TTFontDescription extraGapFor: self]!

Item was removed:
- ----- Method: TTFileDescription>>extraGap: (in category 'accessing') -----
- extraGap: anIntegerOrNil
- 	"Increase or decrease the receivers line gap"
- 
- 	extraGap = anIntegerOrNil ifTrue: [^ self].
- 	extraGap := anIntegerOrNil.
- 	TTCFont allSubInstancesDo: [:font |
- 		font ttcDescription == self ifTrue: [font reset "keep glyph cache"]].
- 	TextStyle allInstancesDo: [:style | style reset].!

Item was removed:
- ----- Method: TTFileDescription>>extraScale (in category 'accessing') -----
- extraScale
- 
- 	^ extraScale ifNil: [extraScale := TTFontDescription extraScaleFor: self]!

Item was removed:
- ----- Method: TTFileDescription>>extraScale: (in category 'accessing') -----
- extraScale: aFloatOrNil
- 	"EXPERIMENTAL. See commentary in TTFontDescription"
- 
- 	self extraScale = aFloatOrNil ifTrue: [^ self].
- 	extraScale := aFloatOrNil.
- 	TTCFont allSubInstancesDo: [:font |
- 		font ttcDescription == self ifTrue: [font flushCache]].!



More information about the Squeak-dev mailing list