This repository was archived by the owner on Aug 2, 2021. It is now read-only.

Description
From @GoogleCodeExporter on March 25, 2015 14:2
fistSupportedLocaleWithFallback: aNiladicBlock
| availableLanguageLocaleIDs |
availableLanguageLocaleIDs := GetTextTranslator availableLanguageLocaleIDs.
self requestContext request acceptLanguage do: [ :each |
| locale |
locale := each value.
(availableLanguageLocaleIDs includes: locale asLocaleID)
ifTrue: [ ^ locale ] ].
^ aNiladicBlock value
In 3.1
Original issue reported on code.google.com by [email protected] on 22 Oct 2014 at 2:08
Copied from original issue: SeasideSt/Seaside#834