[etoys-dev] Etoys: TrueType-Richo.5.mcz

[Bert Freudenberg]

We must *only* look for fonts in <imagePath>/fonts by default. Otherwise projects would not be compatible between platforms anymore.

One option would be to add a "platformFonts" preference that would be off by default in our image.

- Bert -

On 12.06.2010, at 17:52, commits at source.squeak.org wrote:

> Ricardo Moran uploaded a new version of TrueType to project Etoys:
> http://source.squeak.org/etoys/TrueType-Richo.5.mcz
> 
> ==================== Summary ====================
> 
> Name: TrueType-Richo.5
> Author: Richo
> Time: 12 June 2010, 2:52:41 pm
> UUID: eac6d292-1884-4e47-8da8-e965079f6b1f
> Ancestors: TrueType-Richo.4
> 
> * Added (imagePath)/fonts as a path for looking fonts.
> 
> =============== Diff against TrueType-Richo.4 ===============
> 
> 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.
> 
> + 	aBlock value: (SmalltalkImage current imagePath, FileDirectory pathNameDelimiter asString, 'fonts').
> + 
>  	"Platform specific directories"
>  	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:[].
>  	!