[etoys-dev] Etoys Inbox: Collections-Richo.6.mcz

[commits at source.squeak.org]

A new version of Collections was added to project Etoys Inbox:
http://source.squeak.org/etoysinbox/Collections-Richo.6.mcz

==================== Summary ====================

Name: Collections-Richo.6
Author: Richo
Time: 22 May 2010, 4:28:55 pm
UUID: 07168c5f-a377-9049-8509-aed182ae1f30
Ancestors: Collections-Richo.5

* Removed some of the stuff that now belong to GetText package.

=============== Diff against Collections-Richo.5 ===============

Item was changed:
  SystemOrganization addCategory: #'Collections-Abstract'!
  SystemOrganization addCategory: #'Collections-Arrayed'!
  SystemOrganization addCategory: #'Collections-Sequenceable'!
  SystemOrganization addCategory: #'Collections-SkipLists'!
  SystemOrganization addCategory: #'Collections-Streams'!
- SystemOrganization addCategory: #'Collections-Support'!
  SystemOrganization addCategory: #'Collections-Strings'!
+ SystemOrganization addCategory: #'Collections-Support'!
  SystemOrganization addCategory: #'Collections-Text'!
  SystemOrganization addCategory: #'Collections-Unordered'!
  SystemOrganization addCategory: #'Collections-Weak'!

Item was removed:
- ----- Method: String>>translatedNoop (in category 'translating') -----
- translatedNoop
- 	"This is correspondence gettext_noop() in gettext."
- 	^ self!

Item was removed:
- ----- Method: String>>translatedInDomain: (in category 'translating') -----
- translatedInDomain: aDomainName
- ^self translatedTo: LocaleID current inDomain: aDomainName
- !

Item was removed:
- ----- Method: String>>translatedInAnyDomain (in category 'translating') -----
- translatedInAnyDomain
- | translation |
- Transcript show: self printString, ' translatedInAnyDomain'; cr.
- TextDomainManager allKnownDomains do: [:domain |
- 	translation := self translatedInDomain: domain.
- 	self = translation ifFalse: [^translation]
- ].
- ^self!

Item was removed:
- ----- Method: String>>translatedIfCorresponds (in category 'translating') -----
- translatedIfCorresponds
- 	"answer the receiver translated to the default language only if 
- 	the receiver begins and ends with an underscore (_)"
- 	^ ('_*_' match: self)
- 		ifTrue: [(self copyFrom: 2 to: self size - 1) translated]
- 		ifFalse: [self]!

Item was removed:
- ----- Method: String>>translatedTo: (in category 'translating') -----
- translatedTo: localeID 
- 	"answer the receiver translated to the given locale id"
- 	^ self translatedTo: localeID inDomain: (TextDomainManager domainOfMethod: thisContext sender method).!

Item was removed:
- ----- Method: String>>translatedTo:inDomain: (in category 'translating') -----
- translatedTo: localeID inDomain: aDomainName
- 	"answer the receiver translated to the given locale id in the textdomain"
- 
- 	^ NaturalLanguageTranslator translate: self 
- 								toLocaleID: localeID 
- 								inDomain:  aDomainName!

Item was removed:
- ----- Method: String>>literalStringsDo: (in category 'translating') -----
- literalStringsDo: aBlock 
- 	"Assuming the receiver receiver is a literal, evaluate aBlock with all Strings (but not Symbols) within it."
- 	aBlock value: self!

Item was removed:
- ----- Method: String>>translated (in category 'translating') -----
- translated
- 	"answer the receiver translated to the default language"
- 	^ self
- 		translatedTo: LocaleID current
- 		inDomain: (TextDomainManager domainOfMethod: thisContext sender method) !