summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorpad <pad@mandriva.com>1999-09-06 10:28:41 +0000
committerpad <pad@mandriva.com>1999-09-06 10:28:41 +0000
commited415606af749ae52aef3b3fcb2f59e818e1e705 (patch)
treecfc8a3d182b9edc6f8320df443c13f8ea7bbca3a /perl-install
parente8059cec2f7399b2c5537cb11ab9b17628d2f946 (diff)
downloaddrakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar
drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar.gz
drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar.bz2
drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar.xz
drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.zip
PAD don't work because my $sup = $o->{superuser}; don't create reference
the result will go in $sup but not in $o->{superuser}
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index dd12293e5..80efd4070 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -393,8 +393,8 @@ wish to access and any applicable user name and password."),
#------------------------------------------------------------------------------
sub setRootPassword($) {
my ($o) = @_;
- $o->{superuser} ||= {};
- $o->{superuser}{password2} ||= $o->{superuser}{password} ||= "";
+# $o->{superuser} ||= {};
+# $o->{superuser}{password2} ||= $o->{superuser}{password} ||= "";
my $sup = $o->{superuser};
$o->ask_from_entries_ref(_("Set root password"),