Ricardo Moran uploaded a new version of GetText to project Etoys: http://source.squeak.org/etoys/GetText-Richo.7.mcz
==================== Summary ====================
Name: GetText-Richo.7 Author: Richo Time: 26 May 2010, 11:21:06 am UUID: 6d28b3fc-fcf2-bb4a-896b-a90a3215e7c8 Ancestors: GetText-Richo.6
* Fixed formatting in two methods. * Changed #= for #== in String>>translated
=============== Diff against GetText-Richo.6 ===============
Item was changed: ----- Method: String>>translatedInAllDomains (in category '*gettext') ----- translatedInAllDomains + | translation | + Transcript show: self printString, ' translatedInAllDomains'; cr. + TextDomainManager allKnownDomains do: [:domain | + translation := self translatedInDomain: domain. + self = translation ifFalse: [^translation] + ]. + ^self! - | translation | - Transcript show: self printString, ' translatedInAllDomains'; cr. - TextDomainManager allKnownDomains do: [:domain | - translation := self translatedInDomain: domain. - self = translation ifFalse: [^translation] - ]. - ^self!
Item was changed: ----- Method: MOFile>>translationFor: (in category 'public') ----- translationFor: aString | | aString size = 0 ifTrue: [^ '']. "Gettext header" + ^ (self searchByDictionary: aString) ifNil: [aString] - ^ (self searchByDictionary: aString) ifNil: [ - "file := (fileName subStrings: ''). - Transcript show: aString printString, ' not found in ', (file last); cr." - ^aString] !
Item was changed: ----- Method: String>>translated (in category '*gettext') ----- translated "answer the receiver translated to the default language" | translation | translation := self translatedTo: LocaleID current inDomain: (TextDomainManager domainOfMethod: thisContext sender method). + self == translation ifTrue: [^self translatedInAllDomains]. - self = translation ifTrue: [^self translatedInAllDomains]. ^translation!
etoys-dev@lists.squeakfoundation.org