diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-04-11 16:55:30 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-04-11 16:55:30 +0000 |
| commit | 9e202c28549dc29ae41cd678df34c4b701e83c1c (patch) | |
| tree | 3c074d4476da69155438e00d8820b237973ba5d1 /perl-install/lang.pm | |
| parent | a84f6450900ed7bd50236ffb98c5d5af44d927ad (diff) | |
| download | drakx-9e202c28549dc29ae41cd678df34c4b701e83c1c.tar drakx-9e202c28549dc29ae41cd678df34c4b701e83c1c.tar.gz drakx-9e202c28549dc29ae41cd678df34c4b701e83c1c.tar.bz2 drakx-9e202c28549dc29ae41cd678df34c4b701e83c1c.tar.xz drakx-9e202c28549dc29ae41cd678df34c4b701e83c1c.zip | |
added missing LD_LOADER reference and remove old code commented.
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index b929771c1..52bdb5802 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -310,9 +310,6 @@ sub set { my $packer = new packdrake("$ENV{SHARE_PATH}/locale.cz2"); $packer->extract_archive("$ENV{SHARE_PATH}/locale", "UTF-8", $languages{$lang}[2]); }; - #require 'run_program.pm'; - #run_program::run("packdrake", "-x", "$ENV{SHARE_PATH}/locale.cz2", "$ENV{SHARE_PATH}/locale", "UTF-8"); - #run_program::run("packdrake", "-x", "$ENV{SHARE_PATH}/locale.cz2", "$ENV{SHARE_PATH}/locale", $languages{$lang}[2]); } #- set all LC_* variables to a unique locale ("C"), and only redefine @@ -480,7 +477,7 @@ sub load_console_font { my ($f, $u, $m) = @{$charsets{$charset} || []}; require run_program; - run_program::run('consolechars', '-v', + run_program::run(if_($ENV{LD_LOADER}, $ENV{LD_LOADER}), 'consolechars', '-v', ('-f', $f || 'lat0-sun16'), $u ? ('-u', $u) : (), $m ? ('-m', $m) : ()); |