From 925e58d2b3b5fc4adeefcf9f7c3062ba5efde627 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 9 Jul 1999 18:48:32 +0000 Subject: *** empty log message *** --- perl-install/install_steps.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/install_steps.pm') 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; -- cgit v1.2.1