Tobias Pape uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-topa.340.mcz

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

Name: Graphics-topa.340
Author: topa
Time: 1 June 2016, 12:06:46.38159 pm
UUID: 31a4dc33-1d42-4817-bdeb-08b727a63d52
Ancestors: Graphics-bf.339

All fonts should know whether they have a glyph.

Also, provide a sample text styled with a font.

=============== Diff against Graphics-bf.339 ===============

Item was added:
+ ----- Method: AbstractFont>>basicHasGlyphOf: (in category 'testing') -----
+ basicHasGlyphOf: aCharacter
+ 
+ 	self subclassResponsibility!

Item was added:
+ ----- Method: AbstractFont>>hasGlyphOf: (in category 'testing') -----
+ hasGlyphOf: aCharacter
+ 
+ 	^ self basicHasGlyphOf: aCharacter!

Item was added:
+ ----- Method: AbstractFont>>sampleText (in category 'example') -----
+ sampleText
+ 
+ 	| text |
+ 	text := (self isSymbolFont or: [(self basicHasGlyphOf: $a) not])
+ 		ifTrue: [Text symbolSample]
+ 		ifFalse: [Text textSample].
+ 	text addAttribute: (TextFontReference toFont: self).
+ 	^ text!

Item was added:
+ ----- Method: FixedFaceFont>>basicHasGlyphOf: (in category 'private') -----
+ basicHasGlyphOf: aCharacter
+ 
+ 	" We present the same for any character, so, yes"
+ 	^ true!

Item was added:
+ ----- Method: StrikeFont>>basicHasGlyphOf: (in category 'multibyte character methods') -----
+ basicHasGlyphOf: aCharacter
+ 
+ 	^ self hasGlyphForCode: (self codeForCharacter: aCharacter)
+ !

Item was removed:
- ----- Method: StrikeFont>>hasGlyphOf: (in category 'multibyte character methods') -----
- hasGlyphOf: aCharacter
- 
- 	^self hasGlyphForCode: (self codeForCharacter: aCharacter)
- !