summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-07-09 18:48:32 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-07-09 18:48:32 +0000
commit925e58d2b3b5fc4adeefcf9f7c3062ba5efde627 (patch)
tree29aed7d1e75323231b3b4623d84ce3c59a148cb8 /perl-install/install_steps.pm
parentc8b361905dedbe2961b4e3c1670d5028eec12807 (diff)
downloaddrakx-925e58d2b3b5fc4adeefcf9f7c3062ba5efde627.tar
drakx-925e58d2b3b5fc4adeefcf9f7c3062ba5efde627.tar.gz
drakx-925e58d2b3b5fc4adeefcf9f7c3062ba5efde627.tar.bz2
drakx-925e58d2b3b5fc4adeefcf9f7c3062ba5efde627.tar.xz
drakx-925e58d2b3b5fc4adeefcf9f7c3062ba5efde627.zip
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index e97ea8e41..fbfc6c12d 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -5,6 +5,7 @@ use strict;
use common qw(:file :system);
use install_any qw(:all);
+use run_program;
use lilo;
use lang;
use keyboard;
@@ -28,7 +29,8 @@ sub new($$) {
}
sub chooseLanguage($) {
- $o->{default}->{lang}
+# eval { run_program::run('loadkeys', "/tmp/$o->{default}->{lang}) }; $@ and log::l("loadkeys failed");
+ $o->{default}->{lang};
}
sub selectInstallOrUpgrade($) {
$o->{default}->{isUpgrade} || 0;