From ad78b8e39cf20d8962eb1b594844d6c36df8bf53 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 17 Sep 2003 11:01:41 +0000
Subject: cancel in setRootPassword means "No password", not cancel

---
 perl-install/install_steps_interactive.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install_steps_interactive.pm')

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index f57c78c6b..7ba215815 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -1144,7 +1144,7 @@ sub setRootPassword {
 { label => N("Password"), val => \$sup->{password},  hidden => 1 },
 { label => N("Password (again)"), val => \$sup->{password2}, hidden => 1 },
 { label => N("Authentication"), val => \$authentication_kind, list => [ any::authentication_kinds() ], format => \&any::authentication_kind2description, advanced => 1 },
-			 ]) or return;
+        ]) or delete $sup->{password};
 
 	any::ask_authentification_parameters($o, $o->{netc}, $o->{authentication}, $authentication_kind) or goto &setRootPassword;
     }
-- 
cgit v1.2.1