diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-02-27 10:30:55 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-02-27 10:30:55 +0000 |
| commit | f2b94cc98739fe62a8ecd5647ac89338d44571a4 (patch) | |
| tree | 8f1ea76a4656e1f6d9dc2b3dde0ef2e5b42b58b0 /perl-install | |
| parent | 199e04d04a5c267835e55fe4b10f5074201a1f8c (diff) | |
| download | drakx-backup-do-not-use-f2b94cc98739fe62a8ecd5647ac89338d44571a4.tar drakx-backup-do-not-use-f2b94cc98739fe62a8ecd5647ac89338d44571a4.tar.gz drakx-backup-do-not-use-f2b94cc98739fe62a8ecd5647ac89338d44571a4.tar.bz2 drakx-backup-do-not-use-f2b94cc98739fe62a8ecd5647ac89338d44571a4.tar.xz drakx-backup-do-not-use-f2b94cc98739fe62a8ecd5647ac89338d44571a4.zip | |
- s/def/default/ (typo)
- add some utf kde fonts
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/lang.pm | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 787789b7f..ae361062f 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -544,10 +544,14 @@ sub charset2kde_charset { #- font+size for different charsets; the field [0] is the default, #- others are overrridens for fixed(1), toolbar(2), menu(3) and taskbar(4) my %charset2kde_font = ( - 'iso-8859-1' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], - 'iso-8859-2' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], - 'iso-8859-9' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'iso-8859-1' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'iso-8859-2' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'iso-8859-9' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], 'iso-8859-15' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'utf_1' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'utf_2' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'utf_9' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], + 'utf_15' => [ "adobe-helvetica,12", "courier,10", "adobe-helvetica,11" ], 'gb2312' => [ "default-ming,16" ], 'jisx0208' => [ "misc-fixed,14", "wadalab-gothic,13" ], 'ksc5601' => [ "daewoo-gothic,16" ], @@ -562,7 +566,7 @@ sub charset2kde_font { my ($charset, $type) = @_; my $kdecharset = charset2kde_charset($charset); - my $font = $charset2kde_font{$charset} || $charset2kde_font{def}; + my $font = $charset2kde_font{$charset} || $charset2kde_font{default}; my $r = $font->[$type] || $font->[0]; #- the format is "font-name,size,5,kdecharset,0,0" I have no idea of the |