[squeak-dev] The Trunk: TrueType-ul.48.mcz

Tobias Pape Das.Linux at gmx.de
Mon Apr 10 11:31:23 UTC 2017


\o/

Thanks y'all!

Best regards
	-Tobias

> On 10.04.2017, at 13:20, H. Hirzel <hannes.hirzel at gmail.com> wrote:
> 
> Thank you for the fix, Levente.
> 
> Now it works fine.
> 
> --Hannes
> 
> On Mon, 10 Apr 2017 11:12:34 0000, commits at source.squeak.org
> <commits at source.squeak.org> wrote:
>> Levente Uzonyi uploaded a new version of TrueType to project The Trunk:
>> http://source.squeak.org/trunk/TrueType-ul.48.mcz
>> 
>> ==================== Summary ====================
>> 
>> Name: TrueType-ul.48
>> Author: ul
>> Time: 10 April 2017, 1:12:07.452066 pm
>> UUID: e77f1e71-082c-45b2-a099-dc0d353ef32e
>> Ancestors: TrueType-tfel.47
>> 
>> - on unix, visit the whole directory tree starting at /usr/share/fonts in
>> TTFileDescription class>>fontPathsDo:, because most fonts have their own
>> subdirectories
>> 
>> =============== Diff against TrueType-tfel.47 ===============
>> 
>> 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:{
>> 		['Win32']	->	[
>> 			"Standard Windows fonts directory"
>> 			aBlock value: 'C:\Windows\Fonts'.
>> 		].
>> 		['Mac OS']	->	[
>> 			"Standard system fonts directories"
>> 			#('/System/Library/Fonts' '/Library/Fonts') do: [:fontDir |
>> 				aBlock value: fontDir].
>> 		].
>> 		['unix']		->	[ | base |
>> 			"Standard fonts are in /usr/share/fonts/*"
>> 			base := '/usr/share/fonts'.
>> + 			(FileDirectory on: base) directoryTreeDo: [ :path |
>> + 				path last isDirectory ifTrue: [
>> + 					aBlock value: path last fullName ] ].
>> - 			(FileDirectory on: base) directoryNames
>> - 				do:[:dn| aBlock value: base, '/', dn].
>> 		].
>> 	} otherwise:[].
>> 	!
>> 
>> 
>> 
> <Unix_path_fix_for_FontImporterTool_Screenshot_2017-04-10.png>



More information about the Squeak-dev mailing list