diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-03-27 17:33:36 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-03-27 17:33:36 +0000 |
| commit | 1dc7cb7c13d5f0a68dd01b44ee924567fbd6474f (patch) | |
| tree | c7c2bc9cdf67a70955757ee1bfbd05c8c52c9364 /perl-install/standalone/finish-install | |
| parent | eb48a9e0a0d9e616015c79447f88f420971cba51 (diff) | |
| download | drakx-backup-do-not-use-1dc7cb7c13d5f0a68dd01b44ee924567fbd6474f.tar drakx-backup-do-not-use-1dc7cb7c13d5f0a68dd01b44ee924567fbd6474f.tar.gz drakx-backup-do-not-use-1dc7cb7c13d5f0a68dd01b44ee924567fbd6474f.tar.bz2 drakx-backup-do-not-use-1dc7cb7c13d5f0a68dd01b44ee924567fbd6474f.tar.xz drakx-backup-do-not-use-1dc7cb7c13d5f0a68dd01b44ee924567fbd6474f.zip | |
really store root password when using simplified user+root dialog
Diffstat (limited to 'perl-install/standalone/finish-install')
| -rwxr-xr-x | perl-install/standalone/finish-install | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install index cd5065026..201ca674f 100755 --- a/perl-install/standalone/finish-install +++ b/perl-install/standalone/finish-install @@ -104,9 +104,9 @@ sub ask_authentication() { #- USER_RENAME_FROM=<old user>: create the new user by renaming <old user> #- USER_AUTOLOGIN_FIRST: configure autologin for the first added user sub ask_users() { - my $users = []; - my $ask_root = to_bool(lc(get_conf('USERS')) eq 'with_root'); - any::ask_user_and_root($in, $ask_root, $users, $security); + my $users = []; + my $superuser = to_bool(lc(get_conf('USERS')) eq 'with_root') && {}; + any::ask_user_and_root($in, $superuser, $users, $security); my $old_user = get_conf('USER_RENAME_FROM'); if (@$users && $old_user) { $users->[0]{rename_from} = $old_user; |