summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-04-11 16:55:30 +0000
committerFrancois Pons <fpons@mandriva.com>2001-04-11 16:55:30 +0000
commit9e202c28549dc29ae41cd678df34c4b701e83c1c (patch)
tree3c074d4476da69155438e00d8820b237973ba5d1 /perl-install
parenta84f6450900ed7bd50236ffb98c5d5af44d927ad (diff)
downloaddrakx-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')
-rw-r--r--perl-install/lang.pm5
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) : ());