diff options
| author | Pablo Saratxaga <pablo@mandriva.com> | 2004-03-12 21:09:22 +0000 |
|---|---|---|
| committer | Pablo Saratxaga <pablo@mandriva.com> | 2004-03-12 21:09:22 +0000 |
| commit | 44f8737a9580e6267e84819634963abb8cd93129 (patch) | |
| tree | 83d1bb43279ba847210b5c9de0cae54c2364912a /perl-install | |
| parent | f1007107552bc49bdd6d506b8ffc234d8a73cf0b (diff) | |
| download | drakx-44f8737a9580e6267e84819634963abb8cd93129.tar drakx-44f8737a9580e6267e84819634963abb8cd93129.tar.gz drakx-44f8737a9580e6267e84819634963abb8cd93129.tar.bz2 drakx-44f8737a9580e6267e84819634963abb8cd93129.tar.xz drakx-44f8737a9580e6267e84819634963abb8cd93129.zip | |
small correction
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/lang.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index cfbe04784..542089868 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -981,7 +981,7 @@ sub write { s/^(Language)=.*/$1=$locale->{lang}/; if (!member($kde_charset, 'iso8859-1', 'iso8859-15')) { #- don't keep the default for those - my $font_list = $charset2kde_font{$charset} || $charset2kde_font{default}; + my $font_list = $charset2kde_font{l2charset($locale->{lang})} || $charset2kde_font{default}; my $font_small = $font_list->[0]; my $font_huge = $font_small; $font_huge =~ s/(.*?),\d+/$1,24/; |