Tim Felgentreff uploaded a new version of TrueType to project The Trunk:
http://source.squeak.org/trunk/TrueType-tfel.46.mcz==================== Summary ====================
Name: TrueType-tfel.46
Author: tfel
Time: 30 August 2016, 1:38:08.792946 pm
UUID: 31dbdab7-9421-6b4f-b53d-e6a1e342739f
Ancestors: TrueType-tfel.45
Replace underscore assignments with :=
=============== 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'!