[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
|