diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-07-18 21:05:17 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-07-18 21:05:17 +0000 |
| commit | dd40621fa1311c9bce97902e2db57f8b15fab449 (patch) | |
| tree | 021c7c75ccde203bbc43ee77a66f9585d9157c61 /perl-install/lang.pm | |
| parent | 61e87a9fb56f97ae843557511ba3609f9849cc2e (diff) | |
| download | drakx-backup-do-not-use-dd40621fa1311c9bce97902e2db57f8b15fab449.tar drakx-backup-do-not-use-dd40621fa1311c9bce97902e2db57f8b15fab449.tar.gz drakx-backup-do-not-use-dd40621fa1311c9bce97902e2db57f8b15fab449.tar.bz2 drakx-backup-do-not-use-dd40621fa1311c9bce97902e2db57f8b15fab449.tar.xz drakx-backup-do-not-use-dd40621fa1311c9bce97902e2db57f8b15fab449.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index c7d8ed25e..54e75bcd8 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -19,7 +19,7 @@ my %languages = ( "ro" => [ "Romanian", "lat2-sun16", "iso02", "ro_RO" ], "sk" => [ "Slovak", "lat2-sun16", "iso02", "sk_SK" ], "ru" => [ "Russian", "Cyr_a8x16", "koi2alt", "ru_SU" ], -"uk_UA"=> [ "Ukrainian", "RUSCII_8x16", "koi2alt", "uk_UA" ], +"uk_UA"=> [ "Ukrainian", "ruscii_8x16", "koi2alt", "uk_UA" ], ); 1; @@ -39,7 +39,7 @@ sub set { if ($lang) { $ENV{LANG} = $ENV{LINGUAS} = $lang; $ENV{LC_ALL} = $languages{$lang}->[3]; - my $f = $languages{$lang}->[1]; $f and load_font($f); + #if (my $f = $languages{$lang}->[1]) { load_font($f) } } else { # stick with the default (English) */ delete $ENV{LANG}; @@ -74,7 +74,7 @@ sub write { sub load_font { my ($fontFile) = @_; - cpio::installCpioFile("/etc/fonts.cgz", $fontFile, "/tmp/font", 1) or die "error extracting $fontFile from /etc/fonts.cfz"; - c::loadFont('/tmp/font') or log::l("error in loadFont: one of PIO_FONT PIO_UNIMAPCLR PIO_UNIMAP PIO_UNISCRNMAP failed: $!"); + log::l("loading font /usr/share/consolefonts/$fontFile.psf"); + c::loadFont("/tmp/$fontFile") or log::l("error in loadFont: one of PIO_FONT PIO_UNIMAPCLR PIO_UNIMAP PIO_UNISCRNMAP failed: $!"); print STDERR "\033(K"; } |