summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-08-12 12:05:22 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-08-12 12:05:22 +0000
commit665d9ad8aa8b8a71198ef8b6cae00e94b9244391 (patch)
treeb0dda9c2bb7e22f6922a67aacc1b201050142fba /perl-install/install2.pm
parentff64e6601b57962132cc0be8b7f8d70b86392ac0 (diff)
downloaddrakx-backup-do-not-use-665d9ad8aa8b8a71198ef8b6cae00e94b9244391.tar
drakx-backup-do-not-use-665d9ad8aa8b8a71198ef8b6cae00e94b9244391.tar.gz
drakx-backup-do-not-use-665d9ad8aa8b8a71198ef8b6cae00e94b9244391.tar.bz2
drakx-backup-do-not-use-665d9ad8aa8b8a71198ef8b6cae00e94b9244391.tar.xz
drakx-backup-do-not-use-665d9ad8aa8b8a71198ef8b6cae00e94b9244391.zip
no_comment
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm9
1 files changed, 6 insertions, 3 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index a1645d07a..cab2718db 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -18,6 +18,7 @@ use detect_devices;
use pkgs;
use smp;
use lang;
+use run_program;
my @installStepsFields = qw(text help skipOnCancel skipOnLocal prev next);
my @installSteps = (
@@ -205,11 +206,13 @@ sub finishNetworking { $o->finishNetworking }
sub configureTimezone { $o->timeConfig }
sub configureServices { $o->servicesConfig }
sub setRootPassword { $o->setRootPassword }
-sub addUser { $o->addUser }
+sub addUser {
+ $o->addUser;
+ run_program::rooted($o->{prefix}, "pwconv"); # use shadow passwords
+}
sub createBootdisk {
- $::testing and return;
- $o->{isUpgrade} or fs::write($o->{prefix}, $o->{fstab});
+ fs::write($o->{prefix}, $o->{fstab}) unless $o->{isUpgrade};
modules::write_conf("$o->{prefix}/etc/conf.modules", 'append');
$o->createBootdisk;
}