diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2003-01-24 11:41:34 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-01-24 11:41:34 +0000 |
| commit | 1344c430fe7852aab13944e6c1831a8c7d2c6bb1 (patch) | |
| tree | a04a317febe514afd2f3696fa710f39d19aacb25 /perl-install/lang.pm | |
| parent | f131284da380e1abcb14c1a37198337ab223c55a (diff) | |
| download | drakx-1344c430fe7852aab13944e6c1831a8c7d2c6bb1.tar drakx-1344c430fe7852aab13944e6c1831a8c7d2c6bb1.tar.gz drakx-1344c430fe7852aab13944e6c1831a8c7d2c6bb1.tar.bz2 drakx-1344c430fe7852aab13944e6c1831a8c7d2c6bb1.tar.xz drakx-1344c430fe7852aab13944e6c1831a8c7d2c6bb1.zip | |
fix non latin1 post-install perl-gtk2 apps, seems like perl upgrading strings to utf8 is somewhat broken (dunno why), so now we bind the codeset or our textdomains to utf8 and tag the translated strings to utf8, when using gtk
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 860544481..6abc10553 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -779,6 +779,7 @@ sub bindtextdomain() { c::setlocale(); c::bind_textdomain_codeset('libDrakX', 'UTF-8'); + $::need_utf8_i18n = 1; c::bindtextdomain('libDrakX', $localedir); $localedir; @@ -828,7 +829,10 @@ sub load_console_font { #- in console mode install, ensure we'll get translations in the right codeset #- (charset of locales reported by the glibc are UTF-8 during install) - $acm and c::bind_textdomain_codeset('libDrakX', lang2charset($lang)); + if ($acm) { + c::bind_textdomain_codeset('libDrakX', lang2charset($lang)); + $::need_utf8_i18n = 0; + } } sub get_x_fontset { |