diff options
author | mark <mark> | 2011-09-15 10:19:03 +0000 |
---|---|---|
committer | mark <mark> | 2011-09-15 10:19:03 +0000 |
commit | 62b12e8b09608b7081ffd596be899fafb5c2403f (patch) | |
tree | ea185e690b709c5e66365f24e039c86b3404b12b /FS/FS/Locales.pm | |
parent | 43af0ec176ff2ad5c4ecd60a58145f8370cc39d7 (diff) |
invoice template and config localization, #12367
Diffstat (limited to 'FS/FS/Locales.pm')
-rw-r--r-- | FS/FS/Locales.pm | 18 |
1 files changed, 16 insertions, 2 deletions
diff --git a/FS/FS/Locales.pm b/FS/FS/Locales.pm index 607f2be..351f478 100644 --- a/FS/FS/Locales.pm +++ b/FS/FS/Locales.pm @@ -28,8 +28,11 @@ Returns a list of the available locales. =cut tie our %locales, 'Tie::IxHash', - 'en_US', { name => 'English', country => 'United States', }, - 'iw_IL', { name => 'Hebrew', country => 'Israel', rtl=>1, }, + 'en_CA', { name => 'English', country => 'Canada', }, + 'en_US', { name => 'English', country => 'United States', }, + 'fr_CA', { name => 'French', country => 'Canada', }, + 'fr_FR', { name => 'French', country => 'France', }, + 'iw_IL', { name => 'Hebrew', country => 'Israel', rtl=>1, }, ; sub locales { @@ -47,6 +50,17 @@ sub locale_info { %{ $locales{$locale} }; } +=item description LOCALE + +Returns "Language (Country)" for a locale. + +=cut + +sub description { + my($class, $locale) = @_; + $locales{$locale}->{'name'} . ' (' . $locales{$locale}->{'country'} . ')'; +} + =back =head1 BUGS |