diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-07-24 21:15:45 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-07-24 21:15:45 +0000 |
| commit | 6b2a4158cc229cf3bb1edb54c9428e567696b54a (patch) | |
| tree | 008ca7c5826aa73d42ea6f633c95cb146f533de0 /perl-install/install2.pm | |
| parent | 56b374075f45355184b2927cc2f24262dc7e6c21 (diff) | |
| download | drakx-6b2a4158cc229cf3bb1edb54c9428e567696b54a.tar drakx-6b2a4158cc229cf3bb1edb54c9428e567696b54a.tar.gz drakx-6b2a4158cc229cf3bb1edb54c9428e567696b54a.tar.bz2 drakx-6b2a4158cc229cf3bb1edb54c9428e567696b54a.tar.xz drakx-6b2a4158cc229cf3bb1edb54c9428e567696b54a.zip | |
no_comment
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 8458412dc..bb97fdbcf 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -19,7 +19,7 @@ use pkgs; use smp; use lang; -$::testing = 1;#$ENV{PERL_INSTALL_TEST}; +$::testing = $ENV{PERL_INSTALL_TEST}; $INSTALL_VERSION = 0; my @installStepsFields = qw(text help skipOnCancel skipOnLocal prev next); @@ -117,7 +117,7 @@ $o = $::o = { default => $default, steps => \%installSteps, orderedSteps => \@or sub selectLanguage { $o->{lang} = $o->chooseLanguage; lang::set($o->{lang}); - keyboard::setup(); + $o->{keyboard} = keyboard::setup(); } sub selectPath { @@ -238,7 +238,7 @@ install chapter of the Official Linux Mandrake User's Guide."); } sub main { -# $SIG{__DIE__} = sub { chomp $_[0]; log::l("ERROR: $_[0]") }; + $SIG{__DIE__} = sub { chomp $_[0]; log::l("ERROR: $_[0]") }; # if this fails, it's okay -- it might help with free space though unlink "/sbin/install"; |