[BUG] TTFontDescription default causes a walkback in Objects Tool
ned at bike-nomad.com
Thu Mar 14 23:55:51 UTC 2002
I had an older 3.2 image in which I removed the project "Squeak in 3D" to
remove clutter. Then I updated it.
Unfortunately, this meant that when change set 4596TrueType-tk came along,
its attempt to find a TrueType font to be the default didn't work (though it
didn't diagnose this problem).
Its postscript goes like this:
Find the TrueType font in the system, and install it as the default in
TTFontDescription. It is MS Comic Sans from the Squeak Rulez example in the
project 'Squeak in 3D'."
| ttfdCls |
ttfdCls _ Smalltalk at: #TTFontDescription ifAbsent: [^ nil].
ttfdCls allInstancesDo: [:aTTFD |
aTTFD fullName = 'Comic Sans MS' ifTrue: [
ttfdCls classPool at: #Default put: aTTFD]].
Well, this wouldn't be a big problem, except for the fact that in
TTFontDescription>>initializeToStandAlone, there's this code:
dd _ TTFontDescription default.
dd ifNil: [^ RectangleMorph initializeToStandAlone]. "not available"
And since RectangleMorph doesn't understand initializeToStandAlone, you get a
walkback when you select the "Basic 2" or "Text" pages in the Objects tool.
currently: Stanwood, WA
email: ned at bike-nomad.com
More information about the Squeak-dev