diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-17 15:42:29 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-17 15:42:29 +0000 |
| commit | dddfb90059117e6dde52c09e79ba0c8672942b53 (patch) | |
| tree | 351bfc56411ea5e33782e579e7291ed783023b4c /perl-install/install2.pm | |
| parent | e2ab672b87d900beabb21632833e2f97d475b09a (diff) | |
| download | drakx-backup-do-not-use-dddfb90059117e6dde52c09e79ba0c8672942b53.tar drakx-backup-do-not-use-dddfb90059117e6dde52c09e79ba0c8672942b53.tar.gz drakx-backup-do-not-use-dddfb90059117e6dde52c09e79ba0c8672942b53.tar.bz2 drakx-backup-do-not-use-dddfb90059117e6dde52c09e79ba0c8672942b53.tar.xz drakx-backup-do-not-use-dddfb90059117e6dde52c09e79ba0c8672942b53.zip | |
no_comment
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 152180a84..8bd94c67b 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -319,8 +319,6 @@ sub formatPartitions { unless ($o->{isUpgrade}) { $o->choosePartitionsToFormat($o->{fstab}); $o->formatMountPartitions($o->{fstab}) unless $::testing; - eval { $o = $::o = install_any::loadO($o) } if $_[1] == 1; - } mkdir "$o->{prefix}/$_", 0755 foreach qw(dev etc etc/profile.d etc/sysconfig etc/sysconfig/console etc/sysconfig/network-scripts @@ -371,7 +369,7 @@ sub doInstallStep { $o->readBootloaderConfigBeforeInstall if $_[1] == 1; $o->beforeInstallPackages; - $o->installPackages($o->{packages}); + $o->installPackages; $o->afterInstallPackages; } #------------------------------------------------------------------------------ @@ -387,9 +385,11 @@ sub miscellaneous { SECURITY => $o->{security}, }); - setVarsInSh("$o->{prefix}/etc/sysconfig/usb", { + my $f = "$o->{prefix}/etc/sysconfig/usb"; + setVarsInSh($f, { MOUSE => bool2yesno($o->{mouse}{device} eq "usbmouse"), - KEYBOARD => bool2yesno(int grep { /^keybdev\.c: Adding keyboard/ } detect_devices::syslog()), + KBD => bool2yesno(int grep { /^keybdev\.c: Adding keyboard/ } detect_devices::syslog()), + getVarsFromSh($f), }); install_any::fsck_option(); @@ -442,14 +442,14 @@ sub setRootPassword { return if $o->{isUpgrade}; $o->setRootPassword($_[0]); - addToBeDone { install_any::setAuthentication() } 'doInstallStep'; + addToBeDone { install_any::setAuthentication($o) } 'doInstallStep'; } #------------------------------------------------------------------------------ sub addUser { return if $o->{isUpgrade}; $o->addUser($_[0]); - install_any::setAuthentication(); + install_any::setAuthentication($o); } #------------------------------------------------------------------------------ |