From cadf729f07d8335aea014a745abbfc24a4c7482b Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Thu, 27 Mar 2008 19:01:13 +0000
Subject: really set the superuser password when using simplified user+root
 dialog (#39218)

---
 perl-install/standalone/finish-install | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'perl-install/standalone/finish-install')

diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install
index ecc334896..ee8ca04f4 100755
--- a/perl-install/standalone/finish-install
+++ b/perl-install/standalone/finish-install
@@ -116,6 +116,9 @@ sub ask_users() {
     }
     my $autologin = any::get_autologin();
     my $autologin_first = ($autologin->{autologin} eq $old_user || lc(get_conf('USER_AUTOLOGIN_FIRST')) eq "yes") && $autologin->{desktop};
+    if ($superuser) {
+        set_authentication($superuser) or goto &ask_users;
+    }
     any::add_users($users, $authentication);
     any::set_autologin($in->do_pkgs, $users->[0]{name}, $autologin_first)
 	if $autologin_first;
-- 
cgit v1.2.1