[Pharo-project] LanguageEnvironment depending on Network stuff
Do we want this dependency? LanguageEnvironment>>fontDownload "(Locale isoLanguage: 'ja') languageEnvironment fontDownload" (FileDirectory default fileExists: self fontFullName) ifTrue: [^ self]. Cursor read showWhile: [self fontDownloadUrls do: [:each | [ | contents f |contents := (each , '/' , self fontFileName) asUrl retrieveContents contents. (contents first: 2) = 'PK' ifTrue: [f := FileStream newFileNamed: self fontFullName. f binary. [f nextPutAll: contents] ensure: [f close]. ^ self]] on: NameLookupFailure do: [:e | e]]]. self error: 'Fonts does not found (' , self fontFullName , ')' http://code.google.com/p/pharo/issues/detail?id=5479&thanks=5479&ts=13317346...
I would also removed the thibetan environment. Stef
Do we want this dependency?
LanguageEnvironment>>fontDownload "(Locale isoLanguage: 'ja') languageEnvironment fontDownload"
(FileDirectory default fileExists: self fontFullName) ifTrue: [^ self]. Cursor read showWhile: [self fontDownloadUrls do: [:each | [ | contents f |contents := (each , '/' , self fontFileName) asUrl retrieveContents contents. (contents first: 2) = 'PK' ifTrue: [f := FileStream newFileNamed: self fontFullName. f binary. [f nextPutAll: contents] ensure: [f close]. ^ self]] on: NameLookupFailure do: [:e | e]]]. self error: 'Fonts does not found (' , self fontFullName , ')'
http://code.google.com/p/pharo/issues/detail?id=5479&thanks=5479&ts=13317346...
In kernel we have -Greek -Japanese -Korean -Latin1 -Latin2 -Latin9 -Nepalese -Russian -SimplifiedChinese Dunno if all are needed in the kernel, or if they should be added as extra packages for those who wants them... On Thu, Mar 15, 2012 at 12:18 PM, Stéphane Ducasse < stephane.ducasse@inria.fr> wrote:
I would also removed the thibetan environment.
Stef
Do we want this dependency?
LanguageEnvironment>>fontDownload "(Locale isoLanguage: 'ja') languageEnvironment fontDownload"
(FileDirectory default fileExists: self fontFullName) ifTrue: [^ self]. Cursor read showWhile: [self fontDownloadUrls do: [:each | [ | contents f |contents := (each , '/' , self fontFileName) asUrl retrieveContents contents. (contents first: 2) = 'PK' ifTrue: [f := FileStream newFileNamed: self fontFullName. f binary. [f nextPutAll: contents] ensure: [f close]. ^ self]] on: NameLookupFailure do: [:e | e]]]. self error: 'Fonts does not found (' , self fontFullName , ')'
http://code.google.com/p/pharo/issues/detail?id=5479&thanks=5479&ts=13317346...
On Mar 15, 2012, at 4:32 PM, Guillermo Polito wrote:
In kernel we have
-Greek -Japanese -Korean -Latin1 -Latin2 -Latin9 -Nepalese -Russian -SimplifiedChinese
Dunno if all are needed in the kernel, or if they should be added as extra packages for those who wants themâ¦
probably nepalese can be out :) Since I guess that it also have links to other
On Thu, Mar 15, 2012 at 12:18 PM, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote: I would also removed the thibetan environment.
Stef
Do we want this dependency?
LanguageEnvironment>>fontDownload "(Locale isoLanguage: 'ja') languageEnvironment fontDownload"
(FileDirectory default fileExists: self fontFullName) ifTrue: [^ self]. Cursor read showWhile: [self fontDownloadUrls do: [:each | [ | contents f |contents := (each , '/' , self fontFileName) asUrl retrieveContents contents. (contents first: 2) = 'PK' ifTrue: [f := FileStream newFileNamed: self fontFullName. f binary. [f nextPutAll: contents] ensure: [f close]. ^ self]] on: NameLookupFailure do: [:e | e]]]. self error: 'Fonts does not found (' , self fontFullName , ')'
http://code.google.com/p/pharo/issues/detail?id=5479&thanks=5479&ts=13317346...
participants (2)
-
Guillermo Polito -
Stéphane Ducasse