Frank Shearar uploaded a new version of TrueType to project The Trunk: http://source.squeak.org/trunk/TrueType-fbs.25.mcz
==================== Summary ====================
Name: TrueType-fbs.25 Author: fbs Time: 25 July 2013, 9:02:47.403 am UUID: 36e831df-1fcc-674c-8dc0-82246dc0028f Ancestors: TrueType-fbs.24
SmalltalkImage current -> Smalltalk.
=============== Diff against TrueType-fbs.24 ===============
Item was changed: ----- Method: TTFileDescription class>>fontPathsDo: (in category 'font paths') ----- fontPathsDo: aBlock "Evaluate aBlock with all of the font paths that should be searched on the current platform"
"Start with the current directory" aBlock value: FileDirectory default pathName.
"Then subdirectory 'fonts'" aBlock value: (FileDirectory default directoryNamed: 'fonts') pathName.
"Platform specific directories" + Smalltalk platformName caseOf:{ - SmalltalkImage current platformName caseOf:{ ['Win32'] -> [ "Standard Windows fonts directory" aBlock value: 'C:\Windows\Fonts'. ]. ['Mac OS'] -> [ "Standard system fonts directory" aBlock value: '/Library/Fonts'. ]. ['unix'] -> [ | base | "Standard fonts are in /usr/share/fonts/*" base := '/usr/share/fonts'. (FileDirectory on: base) directoryNames do:[:dn| aBlock value: base, '/', dn]. ]. } otherwise:[]. !