diff options
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 d0437b41b..bd8eb89ba 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -548,13 +548,13 @@ 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 = ( + 'C' => [ "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" ], @@ -890,6 +890,10 @@ sub check { # consolefonts are checked during build via console_font_files() + if (my @l = difference2([ 'default', keys %charsets ], [ keys %charset2kde_font ])) { + $warn->("no kde font for charset " . join(" ", @l)); + } + if (my @l = grep { lang2country($_) eq 'C' } list()) { $warn->("no country for langs " . join(" ", @l)); } |