[squeak-dev] The Trunk: TrueType-mt.56.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Jan 17 10:35:39 UTC 2022


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

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

Name: TrueType-mt.56
Author: mt
Time: 17 January 2022, 11:35:37.100327 am
UUID: 87fb57c3-79df-0b42-8712-4763733302b8
Ancestors: TrueType-mt.55

Complements Graphics-mt.459

=============== Diff against TrueType-mt.55 ===============

Item was changed:
  ----- Method: TTCFont>>textStyle (in category 'accessing') -----
  textStyle
+ 	"Overwritten to consider the case where a font is primarily registered under a different name... also do not create a new style for orphaned fonts."
  
+ 	self flag: #discuss. "mt: Do we really need this?"
+ 	^ self textStyleOrNil ifNil: [
- 	| styles |
- 	styles := TextStyle actualTextStyles.
- 	
- 	^ (styles includesKey: self name)
- 		ifTrue: [styles at: self name]
- 		ifFalse: [
  			"Fallback: Maybe this font is in a text style with another name?"
+ 			TextStyle actualTextStyles
+ 				detect: [:aStyle | aStyle fontArray anySatisfy: [:font | font familyName = self familyName]]
- 			styles
- 				detect: [:aStyle | aStyle fontArray anySatisfy: [:font | font name = self name]]
  				ifNone: [nil]]!

Item was changed:
  ----- Method: TTCFontSet>>textStyle (in category 'accessing') -----
  textStyle
+ 	"Overwritten to not create a new style for orphaned fonts."
  
+ 	^ self textStyleOrNil!
- 	^ TextStyle actualTextStyles
- 		detect: [:aStyle | (aStyle fontArray collect: [:s | s name]) includes: self name]
- 		ifNone: [].
- !



More information about the Squeak-dev mailing list