diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-01-11 20:12:34 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-01-11 20:12:34 +0000 |
| commit | 7125d7793927520e8dff0b6b3a02def0fbeda408 (patch) | |
| tree | 513e69da959b9c97a8791e57ccc46a399053b4bb /perl-install | |
| parent | f3fabed82bd1c11a05b90dfdb35a0bb9e8c31e50 (diff) | |
| download | drakx-7125d7793927520e8dff0b6b3a02def0fbeda408.tar drakx-7125d7793927520e8dff0b6b3a02def0fbeda408.tar.gz drakx-7125d7793927520e8dff0b6b3a02def0fbeda408.tar.bz2 drakx-7125d7793927520e8dff0b6b3a02def0fbeda408.tar.xz drakx-7125d7793927520e8dff0b6b3a02def0fbeda408.zip | |
(addUser): fix
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index d8af12044..911875063 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -786,16 +786,18 @@ sub setRootPassword { sub addUser { my ($o, $clicked) = @_; $o->{users} ||= []; + if ($o->{security} < 1) { push @{$o->{users}}, { password => 'mandrake', realname => 'default', icon => 'automagic' } if !member('mandrake', map { $_->{name} } @{$o->{users}}); } if (($o->{security} >= 1 || $clicked)) { - any::ask_users($o->{prefix}, $o, $o->{users}, $o->{security}); + any::ask_users($o->{prefix}, $o->{users}, $o->{security}); } install_steps::addUser($o); } +# any::get_autologin($o->{prefix}, $o); |