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

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

Name: Tools-mt.1138
Author: mt
Time: 1 March 2022, 5:36:12.550136 pm
UUID: 18107322-ed21-a74d-8d0b-922e83e066c7
Ancestors: Tools-ct.1137

Complements TrueType-mt.78

=============== Diff against Tools-ct.1137 ===============

Item was changed:
  ----- Method: AbstractFont>>browseAllSymbols (in category '*Tools-Browsing') -----
  browseAllSymbols
  	"This is a variation of #browseAllGlyphs that is optimized to show all available glyphs in a single run, even though their code points may be scattered all over the Unicode range. See #browseAllSymbolsByCategory."
  
+ 	"self isSymbolFont ifFalse: [self notify: 'This is not a symbol font: ', self familyName]."
- 	self isSymbolFont ifFalse: [self notify: 'This is not a symbol font: ', self familyName].
  
  	^ self
+ 		browseGlyphsOf: (((self minCodePoint max: 16r1000) to: self maxCodePoint) select: [:ea | self hasGlyphForCode: ea])
- 		browseGlyphsOf: ((self minCodePoint to: self maxCodePoint) select: [:ea | self hasGlyphForCode: ea])
  		label: 'All symbols in ', self familyName!

Item was added:
+ ----- Method: TTCFont>>browseAllGlyphsScaledToDisplay (in category '*Tools-Browsing') -----
+ browseAllGlyphsScaledToDisplay
+ 	"Overwritten to support not-yet-registered fonts, e.g. through the FontImporterTool."
+ 	
+ 	^ self isInstalled
+ 		ifTrue: [super browseAllGlyphsScaledToDisplay]
+ 		ifFalse: [self browseAllGlyphs]!

Item was added:
+ ----- Method: TTCFont>>browseGlyphsByCategoryOf:select:label: (in category '*Tools-Browsing') -----
+ browseGlyphsByCategoryOf: someCodePointsOrCharacters select: aBlock label: aLabelOrNil
+ 	"Overwritten to speed up browsing for remote fonts. We have to compose a paragraph with a lot of new glyphs in a paragraph ... even though we will not render all at the same time."
+ 	
+ 	ttcDescription cacheGlyphDataDuring: [
+ 		^ super browseGlyphsByCategoryOf: someCodePointsOrCharacters select: aBlock label: aLabelOrNil].!

Item was added:
+ ----- Method: TTCFont>>browseGlyphsOf:select:label: (in category '*Tools-Browsing') -----
+ browseGlyphsOf: someCodePointsOrCharacters select: aBlock label: aLabelOrNil
+ 	"Overwritten to speed up browsing for remote fonts. We have to compose a paragraph with a lot of new glyphs in a paragraph ... even though we will not render all at the same time."	
+ 	
+ 	ttcDescription cacheGlyphDataDuring: [
+ 		^ super browseGlyphsOf: someCodePointsOrCharacters select: aBlock label: aLabelOrNil].!