Tim Felgentreff uploaded a new version of TrueType to project The Trunk:
http://source.squeak.org/trunk/TrueType-tfel.45.mcz==================== Summary ====================
Name: TrueType-tfel.45
Author: tfel
Time: 21 August 2016, 4:51:06.015391 pm
UUID: e1ed3f29-176b-4b3d-8b1d-b755b525da92
Ancestors: TrueType-mt.44, TrueType-tfel.44
merge trunk
=============== Diff against TrueType-mt.44 ===============
Item was changed:
+ ----- Method: TTFontDescription class>>removeDescriptionNamed:subfamilyName: (in category 'instance creations') -----
- ----- Method: TTFontDescription class>>removeDescriptionNamed:subfamilyName: (in category 'instance creation') -----
removeDescriptionNamed: descriptionName subfamilyName: subfamilyName
| tts |
Descriptions ifNil: [^ self].
+ tts _ Descriptions select: [:f | f first name = descriptionName and: [f first subfamilyName = subfamilyName]].
- tts := Descriptions select: [:f | f name = descriptionName and: [f subfamilyName = subfamilyName]].
tts do: [:f | Descriptions remove: f].
!
Item was changed:
----- Method: TTFontDescription>>at: (in category 'accessing') -----
at: aCharOrInteger
+ ^glyphTable at: (aCharOrInteger isCharacter ifTrue: [aCharOrInteger charCode] ifFalse: [aCharOrInteger])+1!
- ^glyphTable at: aCharOrInteger asInteger+1!
Item was changed:
----- Method: TTFontReader class>>serviceOpenTrueTypeFont (in category 'class initialization') -----
serviceOpenTrueTypeFont
^ SimpleServiceEntry
provider: self
+ label: 'open true type font' translatedNoop
- label: 'open true type font'
selector: #openTTFFile:
+ description: 'open true type font' translatedNoop!
- description: 'open true type font'!